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...auf ein tolles Happy End! 
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icht alles ist neu, aber 
vieles ist besser. Ge- 
meint ist das Ergebnis ei- 
nes Redaktionsseminars 
in Augsburg: die neue RUN. 

Nicht zuletzt beeinflußt von zahllosen 
Lesermeinungen, haben wir uns ent- 
schlossen, den gewandelten Anforde- 
rungen derer, die den Computer als 
Hobbygerät oder semiprofessionelles 
Werkzeug benutzen, Rechnung zu tra- 
gen. Mit der vorliegenden Ausgabe 10 
haben sich einige Schwerpunkte verla- 
gert. Wir beginnen mit Berichten aus 
der Welt der Computer, wozu Aktuel- 
les genauso gehört wie (in den näch- 
sten Ausgaben) Berichte über interna- 
tionale Messen. Unsere Informationen 
beziehen wir durch die persönliche Re- 
cherche der Redakteure und Reporter 
oder neuerdings aus CW-Network, ei- 
nem weltweiten Informationsdienst, 
der uns exklusiv mit Computernach- 
richten versorgt. Von nun an wird der 
Amiga-Teil zur festen Einrichtung, 
womit gezeigt wird, daß RUN tatsäch- 
lich das Magazin der ganzen Commo- 
dore-Computer-Familie ist. Dennoch 
bleibt der C64 im Mittelpunkt des In- 
teresses. Die Listings werden profes- 
sioneller und umfangreicher. Das soll 
nicht auf Kosten der Vielfalt gehen; 
deshalb werden sie in Zukunft kleiner 
gedruckt. Daran anschließend folgt 
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ein ausführlicher Spieleteil. Er wird 
von Carsten Borgmeier und Ute Bahn 
betreut und gewinnt deutlich an Ak- 
tualität. Folglich erscheint in dieser 
Ausgabe erstmals ein separater Spiele- 
teil für alle Commodore-Computer- 
Systeme. Rund 20 Seiten werden es in 
jeder Ausgabe sein, in denen alles für 
Joystick-Freaks zu finden ist: topaktu- 
elle Reviews für Amiga, C64 und C16, 
Hintergrundstories, News und die Le- 
serhitparade mit Preisausschreiben 
und Tips für verzwickte Spielsituatio- 
nen. 

Unter anderem stehen diesmal im 
Test: „The Living Daylights“, „Defen- 
der of the Crown“ für den C64 und 
eine bemerkenswerte Spielhallenadap- 
tion für Amiga. Freuen können sich 
auch all diejenigen, die sich für 
Eprommer interessieren. Der RUN- 
Eprommer (Version 2) wird jetzt zu ei- 
nem der schnellsten Eprommer für 
den C64 aufgemöbelt: Zum Brennen 
für 1 KByte wird nicht mehr als eine 
Sekunde benötigt. Der Umbau des al- 
ten Gerätes auf die schnellere Version 
kostet nicht mehr als fünf Mark. Dazu 
gibt es eine Schaltung, die den Prom- 
mer über den Userport mit Spannung 
versorgt, und verbesserte Brennsoft- 
ware in Assembler. Amiga-Program- 
mierern bieten wir eine perfekte Bewe- 
gungsroutine. Sie ist in Assembler ge- 


schrieben und Beginn einer Serie von 
Maschinenspracheroutinen für den 
Amiga. 

Neues gibt es auch auf der Besetzungs- 
liste der RUN-Redaktion. Christian 
Rogge hat sich nach zwei Jahren 
Dienst am Leser selbständig gemacht, 
wird aber weiterhin der Redaktion ver- 
bunden bleiben. (siehe die in diesen 
Tagen erscheinende zweite „Amiga 
Welt“). An seine Stelle ist Uwe Knie- 
rim getreten, der sich bereits in der 
RUN Ausgabe 9 vorgestellt hat. Er hat 
nicht nur viel Erfahrung und Fachwis- 
sen, sondern auch ein sonniges Gemüt 
aus seiner Heimatstadt Kassel mitge- 
bracht. 


Nato Sci 


Chefredakteur 


Oktober/87 IUW) 3 


Bm, 


Eine Künstlerin auf der Dokumenta 8 Wettbewerb: 70 000 Mark für die besten Spiele 
Amiga als Leinwand 6 Die Amiga-Programmierer sind gefordert 42 


Videoscape 3D von Aegis Eine Maus geht fremd 


Erster Test des Grafikanimators 10 Atari-Maus am Amiga 44 
Computerkrinsiunicht rag a nur ein Monitor 46 
Datendelikte sind nicht mehr y 
die Domäne kleiner Gauner 19 

Timesaver, das Multitalent 

Intelligente Uhr für den 1000er 48 
B. B. King’s Amiga 
Ein König des Bl beitet mit C 

2 ER 20 Superlisting: Spacelnvader Construction Set 

2000 Mark für ein tolles Amiga-Spiel 50 
TEEN ern 

Bewegungsroutine für Amiga in Assembler 61 


Auf dem Weg zur denkenden Maschine 
Biologie weist den Weg zu neuen 


Dee 664, 0128— Listing 


Kurs: Von Basic zu Pascal 


Letzter Teil unseres Programmierkurses 26 C64: Auf den Track gekommen 68 
Musik-Mix mit MIDI C64: Ordnung ins Directory gebracht 71 
Ein Standard verbindet 

Musiker und Computerfreaks 36 C64, C128: Elegantes Booten 74 
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assel, 
Hauptbahn- 
hof. Wer hier 
ankommt, um 
zum Beispiel die Dokumenta 
zu besuchen, wird vergeb- 
lich eine typische Eigen- 
schaft von großen Bahnhö- 
fen suchen: das Schmuddel- 
kino mit den ausgemuster- 
ten Sex- und Wildwestfil- 
men, Einlaß Nonstop. In 
solcherart Traditionsräume 
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Kühle Ästhetik: 50er-Jahre-Objekte dokumenta, 
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EINE KÜNSTLERIN AUF DER 
DOKUMENTA 8 


In diesem Jahr fand in Kassel wieder einmal der Welt größter Jahrmarkt 
künstlerischer Eitelkeiten statt. Weniger spektakulär und mehr am Rande 
dieses großen Medienereignisses präsentierte sich eine Künstlerin namens 
Amiga. Ihr gelang, die elektronischen Pinsel geführt von Menschenhand, eine 
perfekte Kunstdemonstration. 


konnte sich dank des allge- 
meinen Kinosterbens für die 
Zeit der Dokumenta 8 ein 
Sponsor einnisten, um jun- 
gen Künstlern Gelegenheit 
zu geben, ihre Werke der 
Öffentlichkeit vorzustellen. 
Was hat dies aber in einer 
Computerzeitung zu su- 
chen? Nun, die grafischen 
Meisterwerke sind allesamt 
auf eine Leinwand gepinselt, 
die Computerfreaks im all- 
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gemeinen als Bitmap be- 
zeichnen. Für RUN doppelt 
interessant, da diese Lein- 
wände ausnahmslos Be- 
standteile von Amigas sind. 
Dem Besucher wurde die 
Herkunft der Bilder nur im 
Vorraum bewußt. Einige 
dieser Malfreundinnen stan- 
den dort herum und demon- 
strierten die technische Vor- 
gehensweise. Die Werke 
selbst erreichten den Be- 
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risch umgesetzt. 


trachter über die große Ki- 
noleinwand. Perfekte Bild- 
schirmfotos und exzentri- 
sche Musik verbanden sich 
zu einer faszinierenden Ton- 
Dia-Schau. 

Die Bandbreite der Arbeiten 
reichte von dekorativer 
Computergrafik (Thomas 
Heimen „Rasierer“), einer 
Einführung in die Anwen- 
dungsmöglichkeiten der 
Computerkunst (Werner 
Fritz „Intro“), einer Pixel- 
symphonie (Laszlo Horvath 
„Colour Control“), bis zur 
dramaturgischen Inszenie- 
rung in Form von assoziati- 
ven Bilderketten (Edgar Go- 
ris „Flashback“). 


„Rasierer“ ist eine Serie de- 
korativer Computergrafi- 
ken, die auf einem Commo- 
dore Amiga mit dem Pro- 
gramm Deluxe Paint II er- 
stellt wurden. 

Nachdem durch das in den 
letzten Jahren gestiegene In- 
teresse für das Design der 
50er und 60er Jahre sehr 
auffällige Erscheinungen 
wie Autos, Mode, Möbel 
und elektrische Kleingeräte 
zu Sammelobjekten wurden, 
hat Thomas Heimen eine in- 
nerhalb dieser Gruppierung 


wiederum recht unscheinba-> 
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Teil einer „Pixelsymphonie“: Laszio Horvath demonstriert Bewegungsabläufe. 


Spielereien mit Farben, Strukturen ... 
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re Geräteart, den Rasierer, 
zum Thema einer Reihe von 
Computergrafiken gemacht. 
Bei den seit Jahrzehnten nur 
nach zwei prinzipiell unter- 
schiedlichen Systemen funk- 
tionierenden und vom Ver- 
wendungszweck stark form- 
gebundenen Geräten ist eine 
erfreuliche, bei heutigen Ra- 
sierern in dieser Ausgeprägt- 
heit leider kaum zu erken- 
nende Artenvielfalt vorhan- 
den, die erst durch eine Ge- 
genüberstellung der Modell- 
varianten von verschiedenen 
Herstellern zur Geltung 
kommt. 


Die Darstellung der Grafi- 
ken der im allgemeinen 
durch abstrakte, mathema- 
tisch aufgebaute oder über 
Videodigitalisierer eingelese- 
nen Bilder bekannten Com- 
putergrafik erlaubt eine sehr 
neutrale und für die in An- 
betracht des Alters der abge- 
bildeten Objekte ungewöhn- 
liche Wiedergabe. Die Bilder 
wurden ohne Hilfe - einer 
Videokamera unter Verwen- 
dung eines Malprogramms 
„von Hand“ gemalt, wobei 
sich jedes Bild auf eine ma- 
ximale Anzahl von 32 Far- 
ben in einem Bildraster von 
320 + 200 Bildpunkten be- 
schränkt. 


Pixelsymphonie 
Unter der Überschrift „Col- 
or Control“ hat Laszlo Hor- 
vath eine Serie von bunten 
Grafiken mittels des Amiga 
geschaffen, die sich aus ein- 
zelnen farbigen Bildpunk- 
ten, auch „Pixels“ genannt, 
zusammensetzen. Durch 
Bildüberlagerungen entste- 
hen neue Farbverläufe und 
Farben, die mit Musik un- 
termalt eine vollendete „Pi- 
xelsymphonie“ ergeben. 


. .. und großen Flächen verbinden sich in... 


‚..„ der Ton-Dia-Schau Flash Back. 
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Zeitgeist bis 
Endzeit 
thematisiert 
„Flash Back“ von 
Edgar Goris 


Die Ton-Dia-Schau „Flash 
Back“ mit einer Länge von 
40 Minuten wurde gezeich- 
net, fotografiert und zusam- 
mengestellt von Edgar Go- 
ris, welcher sich nach seinem 
Kunstlehrerstudium und der 
Ausbildung zum Theaterpä- 
dagogen schwerpunktmäßig 
mit der Verbindung unter- 
schiedlichster Kunstmedien 
beschäftigt. In der Inszenie- 
rung „Flash Back“ sind 
Computergrafiken, Zeich- 
nungen, digitalisierte Fotos 
und unveränderte Fotogra- 
fien zu assoziativen Bilder- 
ketten aneinandergruppiert. 
Der Musikteppich zu den 
insgesamt 240 Bildern bildet 
die LP Peking Oper von 
Heiner Goebels und das 
Stück Totentanz von Gustav 
Mahler. 


Inhaltlich setzen sich diese 
Bilderketten mit den Zeit- 
und Modeerscheinungen un- 
serer Gesellschaft, welche 
man schlagwortartig mit den 
Begriffen Zeitgeist, Peter- 
Stuyvesant-Generation und 
Endzeitstimmung umschrei- 
ben kann, auseinander. Da- 
bei verzichtet die Inszenie- 
rung jedoch bewußt auf jeg- 
liche Form des sogenannten 
moralischen Zeigefingers 
und bietet dem Zuschauer 
aufgrund der assoziativen 
Anordnung der Aufnahmen 
unzählige Interpretations- 


möglichkeiten. (uk) u 
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VIDEOSGAPE 


al -ANIMATIONGODFTWARE AMIGA 


Ruckfreie Animation läßt sich mit der neuesten 

Software von Aegis realisieren. Objekte können 

dabei gedreht und gewendet werden, sogar der 
Betrachter kann seinen fiktiven Standort verändern. 


achdem mit 
Aegis Anima- 
tor und Deluxe 
Video Con- 
struction Set seit längerer 
Zeit leistungsfähige Pro- 
gramme zum Erstellen ani- 
mierter Bildfolgen lieferbar 
sind, taucht nun in dieser 
Sparte ein neuer Star auf: 
Aegis Videoscape 3D. 

Trickfilme erstellen, in de- 
nen sich dreidimensionale 
Objekte durch den Raum 
bewegen, sich drehen, 
Schatten werfen, das 
wünscht sich mancher Ami- 


ga-User. Videoscape3D stellt 
dazu eine ganze Reihe her- 
vorragender Tools zur Ver- 
fügung, die die Arbeit stark 
erleichtern. 

Videoscape 3D arbeitet mit- 
tels Rasterung, das heißt, 
alle Objekte, die sich bewe- 
gen, werden innerhalb eines 
Gitters verschoben. Jeder 
Punkt innerhalb eines Git- 
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ters kann einfach festgelegt 
werden, indem man angibt, 
wo auf der X-, Y- und der Z- 
Achse er sich befindet. Die 
Produktion eines eigenen 
Trickfilms beginnt mit dem 
Script. Dabei sollte man fest- 
halten, wie sich die Objekte 
während der Aufnahme des 
Films bewegen sollen, wann 
neue Figuren ins Blickfeld 


Nach Eingabe der Eckpunkte ergeben sich... 


der Kamera einwandern und 
der Aufnahmestandort der 
„Kamera“ verändert wird. 


ne Objekte 
schaffen 

Wenn der Ablauf der Szene 
festgelegt ist, beginnt die 
Definition aller vorgesehe- 
nen Objekte. Trotz dreier 


Hilfsprogramme, die einem 
dabei helfen, ist dieser Teil 
der Arbeit der schwierigste 
und zugleich der zeitinten- 
sivste. 

Kleine Objekte und einige 
Grundfiguren sind auf einer 
der mitgelieferten Datendis- 
ketten vorhanden. Als Bei- 
spiel für die Möglichkeiten 
der Editierhilfen sei das Pro- 


gänzt dabei selbständig die 
anderen beiden Zeichnun- 
gen mit den nötigen Punk- 
ten und Linien. Wenn Sie 
glauben, Ihre Figur gezeich- 
net zu haben, schalten Sie in 
den sogenannten Actionedi- 
tor um, und können hier 
Ihre Figur drehen und von 
allen Seiten betrachten. 

Wer jedoch komplexe Ob- 
jekte erstellen will, muß dies 
ohne Rechnerhilfe erledi- 
gen, indem er die Koordina- 
ten aller Ecken Punkt für 
Punkt in eine Textdatei 
überträgt (dabei arbeitet 


. . . das fertige Bild und alle anderen Ablaufphasen. 


gramm D3D erwähnt, das 
sich auf der Programmdis- 
kette von Videoscape3D be- 
findet. Dieses bietet drei 
Zeichenflächen, nämlich ei- 
nen Grundriß, eine Ansicht 
und eine Seitenansicht. Nun 
können mit der Maus in 
irgendeiner dieser Flächen 
Punkte und Linien gezeich- 
net werden. Der Amiga er- 


man mit derselben Raster- 
einteilung wie beim Bewegen 
der Objekte). Sind alle 
Punkte eingegeben, muß 
dem Programm genau mit- 
geteilt' werden, welche 
Punkte miteinander durch 
Linien verbunden werden 
sollen und welche Farben 
die so entstehenden Flächen 
erhalten sollen. 


Bereits sind aber Editierhil- 
fen angekündigt, die auch 
bei großen und komplexen 
Objekten viel mühsame 
Kleinarbeit abnehmen sol- 
len. Die fertig erstellten Ele- 
mente werden auf Diskette 
abgespeichert und dann vor 
der Aufnahme wieder einge- 
lesen. Da eine einzelne Szene 
viele Objekte und Drehbü- 
cher (dazu später mehr) ent- 
halten kann, bietet Video- 
scape die Möglichkeit, alle 
Einstellungen wie Bild- 
schirmauflösung, Anzahl 
und Namen der Drehbü- 
cher, Objekte etc. unter 
einem Sammelnamen abzu- 
speichern. 

Jedes Objekt, das in Video- 
scape3D verwendet wird, 
läßt sich durch ein Dreh- 
buch individuell steuern und 
um alle drei Achsen drehen. 
Dabei wird lediglich angege- 
ben, wo sich der Start- und 
der Endpunkt der Bewegung 
befindet. Der Computer be- 
rechnet dann die gewünschte 
Anzahl Schritte (Bilder) zwi- 
schen diesen beiden Punk- 
ten. Für besondere Effekte 
lassen sich aber auch der 
Aufnahmestandort und die 
Blickrichtung der Kamera 
verändern. 


Natürlich IFF 


Dazu werden in einer Text- 
datei alle Kamerastandorte 
samt der jeweiligen Blick- 
richtung angegeben. Der 
Computer verschiebt dann 
die Kamera von einem 
Punkt zum anderen und be- 
rechnet die gewünschte An- 
zahl dazwischenliegender 
Standorte. Videoscape3D 
bietet dazu noch die Mög- 
lichkeit an, irgendwelche 
Bilder im IFF-Format als 
Hintergrund oder als Vor- 
dergrund zu verwenden. 
Wollen Sie also beispielswei- 
se den Eindruck erwecken, 
mit dem Auto durch einen 
Landschaft zu fahren, laden 
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Sie als Hintergrund das ge- 
wünschte Bild und als Vor- 
dergrund eine Zeichnung, 
die die Armaturen etc. eines 
Autos zeigt. Bestimmte Far- 
ben werden dabei als trans- 
parent dargestellt, so daß 
Sie durch die Frontscheibe 
auf die Gegend blicken. 


Auflösung und 
Aufnahme 


Das Programm bietet vier 
verschiedene Auflösungen 
an: 

— 352 x 220 Punkte und 
352x 440 Punkte mit je- 
weils 32 Farben, 

— 704 x 220 Punkte und 
704 x 440 Punkte mit je- 
weils 16 Farben. 

Die etwas ungewohnte Auf- 
lösung dient dazu, ein Bild 
zu erzeugen, das (wenigstens 
auf einem Amiga mit ameri- 
kanischer Videonorm und 
einer maximalen Auflösung 
von 640 x 400 Punkten) 
bildfüllend ist. 

Wozu aber ein Bild erzeu- 
gen, das leicht größer ist als 
es überhaupt angezeigt wer- 
den kann? Professionelle 
Trickfilme, die mit dem 
Computer erstellt werden, 
werden Bild für Bild errech- 
net und dann auf Videoband 
aufgenommen. Dasselbe 
können Sie nun privat auch 
machen, vorausgesetzt, Sie 
besitzen einen Videorekor- 
der mit Einzelbildaufnah- 
me. Der Amiga liest dann 
nämlich alle Objekte und 
Drehbücher ein und errech- 
net das erste Bild. Ist dieses 
fertig, kann es direkt auf 
Videoband aufgenommen 
werden, und das nächste 
Bild entsteht, bis die ganze 
Sequenz Bild für Bild fertig 
1st. 

Wer keine solche professio- 
nelle Videoanlage besitzt, 
dem bietet Videoscape3D 
die Möglichkeit, sogenannte 
ANIM-Dateien zu erstellen. 
Dabei wird jedes errechnete 
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Bild komprimiert und auf 
Diskette/Festplatte ge- 
schrieben. Die Wiedergabe 
erfolgt dann so: Die ganze 
Datei wird in den Arbeits- 
speicher (mindestens 1MB) 
eingelesen und dann erst an- 
gezeigt. Die Anzeigege- 
schwindigkeit kann im Dia- 
log mit dem Programm ge- 
ändert werden, hängt aber 
stark von der Komplexität 
der Szene ab. Je mehr Ob- 
jekte sich dabei bewegen, 
um so langsamer wird die 
Ausgabegeschwindigkeit. 
Die so erstellten Filme kön- 
nen nun auch auf einen nor- 
malen Videorekorder ohne 
Einzelbildaufnahme aufge- 
zeichnet werden. 


Hardware- 
voraussetzungen 


Videoscape3D arbeitet auf 
allen drei Amiga-Modellen 
mit Kickstart V1.2 und min- 
destens 512 KB Arbeitsspei- 
cher. Wenn Sie ANIM-Se- 
quenzen erstellen wollen, 
brauchen Sie 1 MB Speicher 
und damit können Sie auch 
nur in der niedrigen Auflö- 
sung von 352 x 220 Punk- 
ten arbeiten. Wünschen Sie, 
ANIM-Dateien in Hochauf- 
lösung zu erstellen, sind 
mindestens 2 MB vonnöten. 
Das Programm kann für sei- 
ne Dateien maximal 4 MB 
verwenden, Speichererwei- 
terungen über diese Grenze 
hinaus können aber als 
Ram-Disk verwendet wer- 
den, was vor allem dann 
sehr nützlich ist, wenn Sie 
IFF-Bilder als Hintergrund 
oder als Maske verwenden. 
Ein deutsches Handbuch ist 
erst in sechs bis acht Wo- 
chen lieferbar. Das Pro- 
gramm ist jedoch bereits 
jetzt mit englischem Hand- 
buch erhältlich. 
(Hans-Ulrich Hugi) O 


Info: Softwareland AG, 
Franklinstraße 27, CH-8050 Zürich, 
Tel.: 00 41-1/3 1159 59 
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C128-Zubehör 


Druckerinterface 
100% kompatibel. Paßt 
an praktisch alle Druk- | 


Sicher” der Interfaces. 
#92000G, 148 DM 


Super-Interface 
128K Buffer, Clear, 
Copy, Reset, Dump, 
Monitormode, eigene 
Zeichen programmier- 
bar. Div.Schriftgrößen. 
#92128GTI, 298 DM 


Pufferspeicher 
Wie ein Kabel zwischen 
Computer und Drucker 


#99064, 64K, 248 DM 1 
Loweost V.24 


Treiber, der in vielen 
Programmen bereits 


Intelligente V.24 
Eigener HP, bis 38400 
Baud, Auto-Handshake, 
eigene 64K RAM, ein- 
fach von BASIC anzu- 


steuern. 
#98064, 298 DM 


Soundbox { 
Ein C128 ohne Sound- 
box ist wie ein Fernse- 
her ohne Ton. Einfach 
einstecken. 

#95000, 78 DM 


Nicht-08/15 
PC-Zubehör 


Bufferkabel für PC 
In Sekunden gegen Ihr 


Daten mitnehmen 
Laden Sie Ihre Texte 
einfach in diese Box, 


#88032b,V.24, SI8DM E 
V.24 für Monitor 


ar Giefinie | 

#81064, 698 DM 

"j"-Artikelnummer = Steckerfertig für 
IBM-PC und kompatible inkl. aller Kabel! 
In der C-Version auch für andere Rechner. 


Ladengeschäft: Mo-Fr. 9-17h 


Wir suchen noch mehr geniale Mitarbeiter 
für Technik und Entwicklung. 
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MIKROCOMPUTERTECHNIK 
winchenbachstr. 3-5, 5600 wuppertal 2 
(barmen), telefon: 0209505077 
telefax: 02029/511050 telex: 859 16 56 


Commodore plaudert aus 
dem Nähkästchen: Helmut 
Jost, Vertriebsdirektor für 
Consumer-Produkte (C 16 
bis Amiga) gab die aktuellen 
Verkaufszahlen aus seinem 
Hause bekannt. 647 000 
Commodore-Rechner wan- 
derten im letzten Geschäfts- 
jahr über den Ladentisch — 
das sind 150 000 mehr als im 
Vorjahr. 


Ebenso 310 000 Floppy- 
Laufwerke, 32 000 Drucker, 
87000 Monitore und 
240 000 Datasetten fanden 
den Weg zum Anwender. 
Zur allgemeinen Verwunde- 
rung ist der C64 weiterhin 
äußerst erfolgreich. Im letz- 
ten Geschäftsjahr wurden 
mehr C64er verkauft, als in 
allen vorangegangenen Jah- 
ren zusammen. Nach den 
Analysen der großen Ver- 
sandhäuser Quelle und Otto 
verspricht das Weihnachts- 
geschäft weitere Sensatio- 
nen. 


Dabei wird sich am Preis 
nicht mehr viel ändern. Seit 
seiner Einführung 1983 — 
1298 Mark kostete der C64 
damals — ist der Verkaufs- 
preis um zirka 1000 Mark 
gesunken. Der offizielle 
Verkaufspreis von 348 Mark 
wird von einigen Discoun- 
tern noch unterboten. Bei ei- 
nem Preis von knappen 300 
Mark ist nicht mehr viel 
Luft zum jonglieren. 


Commodore-Schildchen kle- 
ben auf kanpp zwei Millio- 
nen Geräten in Deutsch- 
lands Wohnstuben. Der 
VC20 ist dabei mit 50 000 
Stück vertreten. C16 und 
C116 kommen zusammen 
auf 305 000, der plus4 auf 
130 000 Stück. Vom C64 
existieren 1 220 000 Exem- 
plare. Damit ist er der abso- 
lute Renner unter den Heim- 
computern. 
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Der C128 (D) kommt auf 
eine knappe Viertelmillion 
Exemplare und aus der Ami- 
gaserie erreichten 28 000 
500er und 25 000 Exemplare 
der 1000er Variante ihre 
neuen Besitzer. 

Für das laufende Geschäfts- 
jahr rechnet Commodore 
mit 400000 verkauften 
Heimcomputern, was 400 
Millionen Mark Umsatz ent- 
spricht. Dabei soll nach den 
Erwartungen von Commo- 
dore der Anteil der Billig- 
Produkte zurückgehen. 

Auf lange Sicht wird der 
Amiga nach diesen Progno- 
sen den C64 als Standard- 
Heimcomputer ablösen. 


Neue Amiga- 
Software 


Aus Übersee kündigen sich 
einige neue Software-Pro- 
dukte für den Amiga an. 
Aegis hat gerade seinen Ani- 
mator Videoscape 3D auf 
dem Markt eingeführt und 
auch ein Video-Title-Gene- 
rator wird folgen. Mit 
Sculpt 3D soll das berühmte 
Programm, mit dem der 
Juggler geschaffen wurde, 
bald jedermann zur Verfü- 
gung stehen. Der schwache 
Pagesetter wird bald von 
den DTP-Programmen Pub- 
lisher 1000 und City Desk 
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abgelöst werden. Ein echtes 
Profiprogramm wird unter 
dem Namen The Professio- 
nal Page angeboten werden. 
Das leidige Problem Text- 
verarbeitung verspricht eine 
deutsche Version der IBM- 
Konvertierung WordPerfect 
zu lösen. Neben allen be- 
kannten Features der MS- 
DOS-Version wird Word- 
Perfect über einen Spell- 
checker, Fußnotenverwal- 
tung, Seitennumerierung 
und ein Trennprogramm 
verfügen und dabei voll 
Multitasking-fähig sein, mit 
der Option, bis zu 32 Win- 
dows zu öffnen. Mit Aquisi- 
tion erreicht demnächst die 
erste Amiga-Datenbank den 
deutschen Markt, die auch 
professionellen Ansprüchen 
gerecht wird. Auf dem 
Hardware-Sektor tut sich 
ebenfalls was: Advantage 
500 wird es möglich ma- 
chen, den Amiga 500 um 2 
Megabyte aufzurüsten und 
von Progressiv Peripherals 
& Software wurde eine 
Erweiterung mit vollen 
8 Megabyte angekündigt. 


Der 2000er 
wird schneller 


Für die Systems in München 
kündigte Commodore die 
Präsentation seiner AT-Kar- 


Steckkarten für das System der offenen Architektur des Amiga 2000. 


te für den Amiga 2000 an. 
Neben der bereits am Markt 
befindlichen PC-Karte er- 
gänzt diese Rechnerplatine 
das Angebot für Erweite- 
rungen des Amiga 2000 und 
demonstriert eindrucksvoll 
das Konzept der offenen Ar- 
chitektur (OSA) dieses 
Computers. An einer Unix- 
Karte wird in den USA be- 
reits gebastelt. Sollte sich 
der Trend zu 80386-Prozes- 
soren abzeichnen, wird es 
sicher auch eine entspre- 
chende Erweiterung für den 
Amiga geben. 

Eine Meldung am Rande: 
Nach Commodore-Angaben 
ist das Betriebssystem des 
Amiga so geschrieben, daß 
es erkennen kann, mit wel- 
cher Variante eines 68000- 
Prozessors es zu tun hat. 
Den Amiga mit verbesserten 
Prozessoren auszurüsten, 
sollte daher kein Problem 
sein. 


Gebremster 
Aufschwung 


Wie die amerikanische elec- 
tronic and Computer Asso- 
ciation in einem Jahres- 
rückblick feststellte, haben 
sich die Absatzzahlen für 
Homecomputer seit 1984 
rückläufig entwickelt. Wur- 
den 1984 noch 5,1 Millionen 
Geräte verkauft, so waren es 
1985 nur 4,1 Millionen und 
1986 3,8 Millionen. Der 
Rückgang dürfte sich fort- 
setzen. Anders in Europa 
und speziell in Deutschland. 
Hier liegen die Verkäufe im- 
mer noch auf einem hohen 
Niveau. 


Bildschirm aus 
Plastikfaser 


Mitsubishi Rayon will im 
November einen Großbild- 
schirm als Weltneuheit vor- 
stellen, der aus gebündelten 


Der Ehrenpreis des Philip Morris Forschungspreises für besondere 
Forschungsleistungen ist dem Erfinder Konrad Zuse für sein 
Lebenswerk zugesprochen worden. Das Foto zeigt Altbundeskanzler 
Helmut Schmidt bei der Übergabe im Bonner Wissenschaftszentrum. 
Zuse hat in den dreißiger Jahren den ersten Computer der Welt 
entwickelt. Links neben ihm seine Ehefrau Gisela Zuse, 
beglückwünscht von Dr. Erich Heußer, Präsident des 


Bundespatentamtes in München. 


Plastikfasern besteht. Der 
Monitor soll aus einer Di- 
stanz von einem Meter und 
aus jedem beliebigen Blick- 
winkel ein klares Bild abge- 
ben. Die Fasern sollen mit 
einem Durchmesser von 0,5 
mm Bilder und Zeichen kla- 
rer als herkömmliche Groß- 
bildschirme wiedergeben. 
Mitsubishi gab an, der Bild- 
schirm habe eine Auflösung 
von 110000 Bildpunkten 
pro m?, die Größe des 
Schirms kann mehrere Me- 
ter betragen. Die Standard- 
größe ist 2,7 auf 3,6 m. 
(sch) 


Hoeneß kommt 


Commodore hat den bishe- 
rigen Mittelstürmer des FC 
Bayern München, Dieter 
Hoeneß, als neuen Lei- 
ter des Sportmarketing 
Deutschland verpflichtet. 
Der bisher tätige Heinz A. 
Hocke wechselte in das Eu- 
ropa-Management von 
Commodore, um Sportmar- 
keting in Europa zu koordi- 
nieren, Dieter Hoeneß, der 


seine Aufgabe bei Commo- 
dore am 1. Oktober 1987 
antreten wird, soll sich um 
die Sportaktivitäten der 
deutschen Commodore-Ge- 
sellschaft kümmern, dazu 
gehört die Wahrnehmung 
der Kontakte zu den Com- 
modore-Werbepartnern im’ 
Sport, in erster Linie zum 
FC Bayern München und 
zur Damen-Volleyball- 
Mannschaft von Bayern 
Lohhof. 


Tele-Fusion 


Jüngst mußte sich der Mo- 
nopolist Post mit den 
neuesten Übertragungstech- 
niken auseinandersetzen. 
Anlaß war die Tatsache, daß 
sich unter diesen techni- 
schen Voraussetzungen ein 
weltweites Verbundnetz aus 
Fernmeldewesen, EDV und 
Bürokommunikation schaf- 
fen läßt. Eine Einigung auf 
den internationalen Stan- 
dard ISDN (Integrated Ser- 
vice Digital Network) kam 
nun unter Mitwirkung des 
Ausschusses der Internatio- 
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nalen Fernmeldeunion zu- 
stande. 

Vorbedingung für die An- 
passung an den Standard ist 
die Digitalisierung des Tele- 
fonnetzes, das heißt, Glasfa- 
serleitungen lösen die bisher 
gebräuchlichen Kupferkabel 
ab. Bis 1993 werden dann im 
gesamten Bundesgebiet 
ISDN-Anschlüsse zur Ver- 
fügung stehen. 


Turboprocess 
zum 
Selberbauen 


Die 4 MHz-Erweiterung von 
Roßmöller (siehe Test in 
RUN 7/87) ist jetzt als Bau- 
satz unter dem Namen „Tu- 
ning 64“ erhältlich. Damit 
Bastler nicht Bausteine kau- 
fen müssen, die sie vorrätig 
haben, wird „Tuning 64“ 
wie folgt angeboten: 

Platine, Bauanleitung mit 
Schaltplan und 69seitigem 
Handbuch: 99 Mark. Zum 
Aufbau notwendige Spezial- 
ICs (drei PALs und ein 
Eprom): 59 Mark. 16 Bit- 
Prozessor CPU 65SC816: 59 


Mark. 

Im Paket kosten alle drei 
Komponenten zusammen 
199 Mark. 


Die Standardbausteine, die 
man sich noch zum Zusam- 
menbau besorgen muß, ko- 
sten im Elektronikfachhan- 
del etwa 60 Mark. Der 
Nachbau von Turboprocess 
kostete damit rund 270 
Mark. Im Vergleich zum 
Fertiggerät (398 Mark) spart 
man beim Selbstbau gut 130 
Mark. 


Bezugsquelle: Roßmöllee GmbH, 
Maxstraße 50-52, 5300 Bonn 1, 
Telefon: 02 28/65 99 80 


Computerclub 
Kirchdorf 


Im Sommer 1985 wurden 
erste Schritte zur Gründung 
des Computerclubs Kirch- 
dorf unternommen. Bereits 


zu Weihnachten des gleichen 
Jahres konnte die zweite 
Ausgabe der Clubzeitschrift 
„Top Computer News“ vor- 
gestellt werden. Bis zum 
heutigen Tag sind unter der 
Regie von Obmann Chri- 
stian Steiner, seinem Stell- 
vertreter Frank Exenberger, 
dem Kassierer Robert Fuchs 
und dem Schriftführer Josef 
Hetzenauer, 23 Ausgaben 
erschienen. Mit zahlreichen 
Partnerclubs sind Coopera- 
tionsverträge abgeschlossen 
worden. Durch die sehr gut 
funktionierende Zusammen- 
arbeit konnte manches Pro- 
blem aus der Welt geschafft 
werden. Club-Chef Steiner: 
„Daß wir im Gegensatz zu 
manch anderen Vereinen 
kein lahmer Haufen sind, 
wollen wir ihnen beweisen. 
Am besten geht das mit Pro- 
bemitgliedschaft. Wem es 
Widererwarten nicht gefällt, 
kann die Mitgliedschaft je- 
derzeit beenden. Und einen 
Clubordner gibts jetzt 
auch!“ 


Computerclub Kirchdorf 
Postfach 24, A-6382 Kirchdorf 


Regelmäßige Reinigung zahlt sich 
aus. Zum Beispiel mit dem neuen 
Drucker-Reinigungsspray von 
Kontakt Chemie: Farbstoffe, 
Farbbandrückstände, Metall- und 
Papierabrieb sowie verharzte 
Fette werden im Nu gelöst. 

Das komplette Druckerreinigungs- 
Set ist im Büro- und EDV- 
Fachhandel zum Preis von DM 
50,90 erhältlich. 
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US-Computer 
dürfen nach 
Japan 


Im Handelskonflikt zwi- 
schen den USA und Japan 
ist einer der vielen Streit- 
punkte beigelegt worden. 
Eine Vereinbarung zwischen 
den beiden Ländern soll den 
japanischen Markt für ame- 
rikanische Supercomputer 
öffnen. Der Kompromiß 
soll die Wettbewerbsnach- 
teile amerikanischer Herstel- 
ler gegenüber japanischen 
Firmen ausgleichen. Die 
Übereinkunft werde jedoch 
amerikanischen Unterneh- 
men nicht notwendigerweise 
zu einem Durchbruch auf 
dem japanischen Markt ver- 
helfen, da die japanischen 
Unternehmen eine Preispoli- 
tik verfolgten, die ausländi- 
schen Firmen praktisch kei- 
ne Chance lasse, kommen- 
tierte der US-Handelsbeauf- 
tragte Clayton Yeutter. 


Bits im Griff 
mit BIT-Profi 


Wer viel programmiert und 
insbesondere Registerzu- 
stände ändert, kommt an 
Dezimal-Binär-Umrechnun- 
gen nicht vorbei. Mit einem 
neu entwickelten „Rechen- 
schieber“ geht dies problem- 
los, ohne daß lange gerech- 
net werden muß. Mittels 
acht Schiebern lassen sich 
bei BIT-Profi die Zustände 
von 8-Bit eines Bytes einstel- 
len. Im Fenster kann dann 
der Dezimalwert abgelesen 
werden. Was auf den ersten 
Blick wie ein unsinniges 
Spielzeug aussieht, erweist 
sich in der Praxis schnell als 
unentbehrlicher Helfer. Re- 
chenfehler wie sie bei Kopf- 
rechnung oder BIT-Addi- 
tion per Taschenrechner 
leicht entstehen, sind mit 
BIT-PROFI nahezu ausge- 
schlossen. Zum Erstellen 
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von Zeichensätzen und Gra- 
fiken ist der Schieber eben- 
falls geeignet, wenn nicht 
allzu viel verändert werden 
soll. Erfreulicherweise ko- 
stet der Schieber nur 19,90 
Mark (plus Porto und Ver- 


packung). 

Bezugsquelle: Pioch, Inselweg 29, 
4936 Augustdorf, Telefon: 
0 52 37/71 09 


Offene Tür 


Der BCC-Berleburger Com- 
puterclub e.V. veranstaltet 
am Samstag, den 7.11.1987 
einen Tag der offenen Tür. 
Zwischen 13.00 Uhr und 
20.00 Uhr werden im Bür- 
gerhaus am Markt, also mit- 
ten in Berleburg, Arbeiten 
des Clubs gezeigt. Es han- 
delt sich dabei nach eigenen 
Aussagen um eine ganze Pa- 
lette von Computersystemen 
sowie unterschiedliche Com- 
puteranwendungen, die ein- 
geführt werden sollen. Der 
Eintritt ist frei. 

Nähere Informationen bei: Dieter 
Prochowski, Wetterhausstraße 16, 
3560 Breidenbach 6, Telefon: 
0 64 65/44 13 


Ein serieller Bombenleger 
hat sich Computerfirmen 
und -abteilungen von 
Universitäten als Ziel ausge- 
wählt. Seine Unternehmun- 
gen hätten bereits ein 
Menschenleben und 21 Ver- 
letzte gefordert, teilte G- 
Man Bennett Cale mit. Seit 
1978 habe der Bombenleger 
mindestens ein Dutzend La- 
dungen in acht Städten — 
von Chicago bis San Fran- 
cisco — hochgehen lassen, 
die letzten beiden in Compu- 
terläden in Kalifornien und 
Utah. 

Die zur Bombenherstellung 
verwendeten Materialien 
und die Technik ließen dar- 
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auf schließen, daß sie das 
Werk einer einzigen Person 
seien. Unabom, eine aus Be- 
amtendesFBI, der Alkohol-, 
der Tabak- und Waffen- 
Behörden und der US-Post 
gebildete Sondereinheit, bie- 
tet für sachdienliche Hin- 
weise, die zur Verhaftung 
des Täters führen, eine Be- 
lohnung von 60 000 Dollar. 
Zeugen des letzten Bomben- 
anschlages gaben an, sie hät- 
ten einen Mann beobachtet, 
der etwas, das aussah wie 
ein Brett mit herausragen- 
den Nägeln, in der Nähe des 
Computerladens versteckte. 
Er wurde beschrieben als 25- 
bis 30jähriger Weißer, 
schlank, mit rötlichem 
Teint, rotblondem Haar und 
einem hellen Schnauzer. Er 
sei 1,75 Meter groß und wie- 
ge 72 Kilogramm. Er habe 
Jeans, einen grauen Pullo- 
ver mit Kapuze und eine Pi- 
loter-Sonnenbrille getragen. 
Computerläden, die nicht 
bestellte Pakete erhielten, 
sollten zuerst einmal den 
Absender anrufen, um fest- 
zustellen, ob die Sendung 
tatsächlich von ihm sei, 
empfahl Cale. Verdächtige 
Pakete sollen der Polizei, 
dem FBI oder der Unabom 
gemeldet werden. 

(sch) 


Eine geplatzte Wasserlei- 
tung im neunten Stock des 
Hauptgebäudes von Gold- 
man-Sachs an der Wall- 
street, zerstörte IBM-Main- 
frames im Wert mehrerer 
Millionen Dollar und setzte 
die Computerbänder und 
Systeme während zweier Ar- 
beitstage unter Wasser. Au- 


genzeigen zufolge seien 
vier Stockwerke über- 
schwenmmt worden. Die 


IBM-Rechner seien mit auf- 
gequollenen Deckenplatten, 
wie mit Lehm zugekleistert, 
gewesen. 


Kühe können 
nicht Experten 
werden 


Es ist ratsam, Experten zur 
Speisung einer Wissensbank 
bereits im Entwicklungssta- 
dium der Applikation hinzu- 
zuziehen. Folgendes Beispiel 
zeigt, daß die Wahl der best- 
geeigneten Experten schwie- 
riger sein kann, als man auf 
den ersten Blick vermuten 
möchte. In einer Feasibility 
— Untersuchung — ging es 
um ein System, das Bauern 
erlauben sollte, das Futter 
für ihre Milchkühe optimal 
zusammenzustellen. Zwei 
Milchwirtschaftsexperten 

nahmen an der Untersu- 
chung teil, und einer der bei- 
den beteiligten Softwareex- 
perten hatte ebenfalls per- 
sönliche Erfahrungen in der 
Landwirtschaft. Es schien, 
daß sowohl ausreichendes 
Spezialistenwissen zur Ver- 
fügung stehen würde und 
daß sich auch kein Kommu- 
nikationsproblem zwischen 
Praktikern und Software- 
spezialisten ergeben würde. 
Die Milchwirtschaftler ga- 
ben Auskunft darüber, auf 
welche Weise die Futtermi- 
schung für Milchkühe zu- 
sammengesetzt werden soll- 
te. Die Faktoren, welche 
diese Frage beeinflussen, 
wurden so umschrieben: 
Rasse und Herkunft der 
Kühe, Gewicht und Alter, 
klimatische Bedingungen, 
die zur Verfügung stehenden 
Gras- und Heusorten, wie 
lange sich die Kühe auf der 
Weide befinden würden, 
wann sie zuletzt gekalbt hat- 
ten, die Konsistenz ihres 
Mistes und das zusätzlich 
notwendige Kraftfutter. Der 


notwendige Umfang der 
Wissensbank ließ darauf 
schließen, daß sich das 


System ohne weiteres auf ei- 
nem Personalcomputer mit 
Festplatte implementieren 
lassen würde, so daß es in 
dieser Form den Bauern di- 
rekt zur Verfügung gestellt 
werden könnte. Damit hätte 
letzten Endes der Landwirt 
ein Mittel in der Hand, mit 
dem er jederzeit die Zusam- 
mensetzung und Menge des 
Kraftfutters bestimmen 
kann, welches er den einzel- 
nen Kühen in den Futtertrog 
geben muß. Als das Team 
zum Schluß der Untersu- 
chung kam und eine Proze- 
dur beschreiben wollte, mit 
welcher die Resultate experi- 
mentell bestätigt werden 
sollten, warf einer der Soft- 
wareleute eine Frage auf: 
„Was passiert, wenn den 
Kühen die Kraftfuttermi- 
schung nicht schmeckt?“ 
Nach kurzem Gelächter 
wurden die Experten ernst- 
haft. Denn es gab keinen 
Weg, um voraussagen zu 
können, ob die Kühe denn 
nun auch wirklich das ange- 
botene Kraftfutter in der 
Zusammensetzung und 
Menge fressen würden, die 
unbedingt notwendig war, 
um ihre Milchproduktion 
tatsächlich zu steigern. Ex- 
perten der letzten Instanz 
waren die Kühe selbst. Die 
Untersuchung widmete sich 
anderen Fragen und das 
Problem der optimalen 
Kraftfuttermischung wurde 
zu den Akten gelegt. 
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Grundig ins 
Computer- 

.. 
geschäft? 
Branchenkenner sehen Be- 
wegungen im PC-Markt. 
Grundig steigt mit seiner 
100%igen Tochter House of 
Computers HOC ins PC- 
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Geschäft ein. „Die Farbseh- 
geräte der neuen Generation 
sind mit soviel Elektronik 
bestückt, daß wir ab etwa 
1990 die Low-cost-Compu- 
ter gleich in die hochauflö- 
senden TV-Bildschirme mit- 
einbauen können“, so die 
Prognose des Grundig Vor- 
standsvorsitzenden Herma- 
nus Konig bei der Eröffung 
des HOC-Center in Nürn- 
berg. 


Seikosha 
SL-80 VC — 
24-Nadel- 
Drucker 


Der neue Briefqualitäts- 
Drucker bietet als erster 24- 
Nadel-Drucker direkte An- 
schlußmöglichkeit an Com- 
modore-Computer über eine 
serielle Schnittstelle. Interes- 
sant ist der Preis von nur 
1099 Mark, fällt doch die 
Anschaffung eines teuren 
Druckerinterface flach. Eine 
eingebaute, parallele Cen- 
tronics Schnittstelle ermög- 
licht problemlosen An- 
schluß an andere Rechner. 


Technische Daten laut Her- 
steller: 


® bidirektionaler Punkt- 
matrixdruck mit Druck- 
weg-Optimierung 

e 54 CPS (LQ-Druck) 
>135'  'CPS 7 IEBV- 
Druck) 

e Papierdurchlaß: 
101—254 mm (10“*) 

e Traktor und Friktions- 
antrieb 

@ halbautomatische 
zelblattverarbeitung 

© interne RAM-Fehlermel- 
dung und Selbsttest 

© Buffer von 16 KB, mit 
Download-Funktion 
(SL-80 AI) 

® Anschlußkabel 
Rechner im Beipack 
(SL-80 VC) 


Ein- 


zum 
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e selektierbare Epson-LQ- 
1500®- und IBM®-Gra- 
fikdrucker Zeichensatz- 
und Befehlsstruktur (SL- 
80 AI) oder MPS 801 
(ASCH oder CBM- 
Mode) 


@ Geräuschpegel: <55dBA 


@ Nutzen: Original + zwei 
Kopien bei 0,2 mm Pa- 
pierstärke 


© Interface: Centronics 
parallel (SL-80 AI) oder 
Commodore seriell 
(SL-80VC) 


e Maße/Gewicht: 
400 x 325 x 140 mm 
(BxTxH)/6,7 kg 


e Netzanschluß: 220 V AC 
#10%/50 Hz 


Spiele-Indizie- 
rung: Wie und 
warum ? 


Das Auge des Gesetzes 
nimmt Computerspiele auf’s 
Korn. Anträge auf Untersu- 
chung stellen Jugend- und 
Bundesjugendämter, dar- 
aufhin wird die Bundesprüf- 
stelle in Bonn ihrerseits ak- 
tiv. Ein Prüfgremium ent- 
scheidet, ob „offensichtliche 
Jugendgefährdung“, also 
sozialethische Desorientie- 
rung durch pornografische, 
gewaltverherrlichende oder 
rassenhetzerische Medien, 
vorliegt. Jugendlichen unter 
18 Jahren dürfen diese Pro- 
dukte nach Indizierung 
nicht mehr zugänglich sein. 
Indessen wird der Effekt 
fragwürdig durch die enor- 
me Reklamewirkung eines 
Verbotes: ein Eldorado für‘ 
Raubkopierer und Geschäf- 
temacher. 


Rechenschieber für 
Bits und Bytes 


Wer oft Registerzustände 
verändert und viel POKEt, 
kommt am BIT-Rechnen 
nicht vorbei. „Bit-Profi“ er- 
leichtert die Arbeit enorm. 
Über acht Schieberegler las- 
sen sich die acht BIT eines 
Bytes beliebig setzen und 


löschen. Der Dezimalwert 
des Byte, der sonst mühsam 
mittels Zweierpotenzen er- 
rechnet werden muß, wird 
bei „Bit-Profi“ in einem Fen- 
ster angezeigt. Was auf den 
ersten Blick wie ein über- 
flüssiges Spielzeug aussieht, 
wird in der Praxis schnell 
zum unentbehrlichen Hel- 
fer: Rechenfehler, wie sie 
beim Errechnen eines Bytes 
schnell passieren, sind mit 
„Bit-Profi“ praktisch ausge- 
schlossen. Die Anwendungs- 
möglichkeiten des postkar- 
tengroßen Rechenschiebers 
sind enorm, sogar als einfa- 
cher Hardware-Spriteeditor 
läßt er sich einsetzen. 
Besonders erfreulich ist der 
Preis von nur 19.90 Mark. 


Bezugsquelle: Fa. M. Pioch, Insel- 
weg 29, 4936 Augustdorf, Tel. 
(05273)7109. 
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MS-DOS — 
leicht 
verdaulich 


Die Entscheidung für oder 
gegen ein Betriebssystem 
hängt meistens davon ab, ob 
es für die Bedürfnisse des 
Anwenders geeignete und 
preiswerte Programme gibt. 
Diese Auswahl an Software 
bietet MS-DOS, das sich da- 
durch mittlerweile zum 
Standard-Betriebssystem 

entwickelt hat. Das Buch 
von Peter Freese gibt eine 
grundlegende Einführung in 
die Bedienung von Personal 
Computern, die mit MS- 
DOS arbeiten. Als Ergän- 
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GRUNDKURS 
COMPUTERPRAXIS 


zung zum Handbuch _ ge- 
dacht, beschränkt sich der 
Autor auf Hinweise zur 
praktischen Anwendung 
und versucht, die Erläute- 
rung von unwesentlichen 
Details zu vermeiden. 

Vom ersten bis zum achten 
Kapitel beschreibt der Autor 
folgende Arbeitsvorgänge: 
Starten, Abbrechen und Be- 
enden der Arbeit am Com- 
puter; die Bedienung von 
MS-DOS; die wichtigsten 
MS-DOS-Befehle; Dateiver- 
waltung auf Diskette oder 
Festplatte; Stapelverarbei- 
tungsdateien; Anpassen des 
Betriebssystems; Benutzung 
einer Festplatte; Einstellung 
von Bildschirm, Drucker 
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und der Kommunikations- 
schnittstelle; Änderung der 
Bereitschaftszeichen; Erset- 
zen von Laufwerksbezeich- 
nungen. 

Hierbei sind die Kapitel so 
aufgebaut, daß der Leser die 
Arbeitsvorgänge von An- 
fang an am Computer nach- 
vollziehen kann. 

Im neunten Kapitel wird 
grundlegend der elementare 
Aufbau des Computers be- 
schrieben wie auch Funk- 
tionsweise und Umgang mit 
MS-DOS, Eingabegeräten, 
Diskettenspeicher und dem 
Drucker. Das zehnte Kapitel 
enthält eine Kurzübersicht 
über die MS-DOS-Befehle, 
ein Literaturverzeichnis und 
Sachwortregister. Alle Bei- 
spiele sind auf einem IBM 
PC/XT entwickelt und auf 
einem kompatiblen Nixdorf- 
Computer 8810/25 nachge- 
prüft worden. 

Peter Freese, „Standard-Betriebs- 
system MS-DOS“, Rowohlt Verlag, 


Reinbek, 1987, 251 Seiten, ISBN 
3-499-18145-2, 14,80 Mark. 


DV- 
Grundwissen 


In seinem Buch „Grundwis- 
sen Informations-Verarbei- 
tung“ will Helmut Schiro 
deutlich zeigen, daß ein 
Computer kein „Buch mit 
sieben Siegeln“ sein muß 
und sich der Laie die erfor- 
derlichen Kenntnisse leicht 
selbst aneignen kann. Der 
Autor beschreibt in einer 
klaren Sprache auch kom- 
plizierte Sachverhalte und 
Zusammenhänge. Komplexe 
Fragen wie die Umwandlung 
von Zahlensystemen, Struk- 
tur und Aufbau von Daten- 
verarbeitungsanlagen sowie 
die Verständigung zwischen 
Mensch und Maschine wer- 
den für den Anfänger ver- 
ständlicher. Die einzelnen 
Kapitel sind so abgefaßt, 
daß sie die logischen Zusam- 
menhänge klar herausstel- 


len. Sie geben einen Einblick 
in Zweck, Anwendung und 
Grundbegriffe der Daten- 
verarbeitung, Struktur und 
Aufbau von Datenverarbei- 


tungssystemen, Betriebssy- 
stemen, Datenkommunika- 
tion, Sprachspeicher und 
Vermittlungssysteme. 
Hinzu kommt eine allgemei- 
ne Einführung in die Infor- 
mationsverarbeitung, ange- 
fangen von Bildschirmtext 
über Management-Informa- 
tionssysteme bis hin zur 
Textverarbeitung. Zu guter 
Letzt folgen ein Fachwort- 
verzeichnis, Sachwortregi- 
ster und bibliografische 
Hinweise. 


Helmut Schiro, „Grundwissen In- 
formations-Verarbeitung“, Falken- 
Verlag, Niederhausen, 1986, 312 
Seiten, ISBN 3-6068-43 14-7, 58 
Mark. 


Turbo Pascal 
im 
Selbststudium 


Wenn Lehrer zur Schreib- 
maschine greifen, entstehen 
meist die bei Schülern mehr 
oder weniger beliebten Ar- 
beitsblätter, Aufgabenzettel 
oder — schlimmer — Klas- 
senarbeiten. Als der Gymna- 
siallehrer Karl-Hermann 
Rollke seine Schreibstube 
nach langer Arbeit wieder 
verließ, legte er den „Grund- 
kurs Turbo Pascal“ vor: 289 
Seiten dicht gepackte Infor- 
mationen über Pascal und 
gutes Programmieren. 


In mehreren Informatik- 
Kursen gesammelte Erfah- 
rung halfen beim Gestalten 
der Einführung in die für 
eingefleischte Basic-Pro- 
grammierer und Anfänger 
nicht ganz einfache Sprache: 
Das Buch läßt deutlich er- 
kennen, daß hier ein Päda- 
goge und kein Informatiker 
tätig war. Reine Computer- 
spezialisten neigen zu Defi- 
nitionen und Beweisen, die 
— laut Text — „unmittelbar 
einsichtigt sind“ und schein- 
bar keiner weiteren Erklä- 
rung bedürfen. Anfänger 
verzweifeln an derartigen, 
zwar logisch einwandfreien, 
aber komplexen Ausführun- 
gen. Lehrer Rollke setzt sei- 
ne Begeisterung für Compu- 
ter in ein geschickt aufge- 
bautes und liebevoll präsen- 
tiertes Lehrbuch um, Detail- 
informationen zeugen von 
Fachwissen. 
Die Kapitel sind übersicht- 
lich geordnet, was bei „Ein- 
führungen“ und „Alles über 
. „“-Werken nicht gerade 
üblich ist. Manche Autoren 


sind so begeistert von ihrem 
Thema, daß sie alles in ei- 
nem Wust von Buchstaben 
unterbringen wollen. Gra- 
fiken sind für solche Wis- 
sensvermittler nur Platzver- 
schwendung; lustige Beispie- 
le Verrat an der Sache. Leh- 
rer Rollke sieht das anders. 


Er scheut sich nicht, Syntax- $» 
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Ohne Einzelblattschacht 


diagramme mit Hilfe der 
„Hühnersprache“ einzufüh- 
ren: Dank eines neuartigen 
Kraftfutters haben Hühner 
eine so hohe Intelligenz ent- 
wickelt, daß sie ohne Ver- 
waltungscomputer nicht 
mehr auszukommen glau- 
ben. Programmiersprache 
ist DUCK, deren reservierte 
Worte aus der Hühnerspra- 
che stammen: Neben „Kike- 
riki“ und „gluck“ sind die 
Definitionen „einei“, „gack“ 
und „tock“ festgelegt. Das 
Syntaxdiagramm (Bild 1) er- 
läutert den Sprachaufbau, 
der Betrachter muß lediglich 
den Pfeilen folgen: Die Aus- 
sagen „gluck gluck“, „gluck 
gack tock gluck“ sind syn- 
taktisch richtig; die Aussage 
„gluck tack einei“ führt zum 
Syntaxfehler. Nach den Re- 
cherchen des Herrn Lehrer 
lautet die entsprechende 
Meldung in DUCK „stupid- 
chicken-error“. 
Schmunzelnd lernt der Leser 
den Aufbau der Befehle und 
erkennt, daß die zunächst 
unwichtig erscheinenden 
Syntaxdiagramme in Pascal 
sehr hilfreich sind, um alle 
Anweisungen richtig aufzu- 
bauen. 

Am Seitenrand informieren 
Stichworte über den Inhalt 
eines Absatzes; schnelles 
Auf- und Wiederfinden wird 
so leichtgemacht. Zeichnun- 
gen und Fotografien veran- 
schaulichen die angespro- 
chenen Konzepte; Rekur- 
sion zum Beispiel wird mit 
einer flott gezeichneten Frau 
deutlich gemacht, die sich in 
einem Spiegel betrachtet. 
Dort sieht sie sich selber und 
den Spiegel, der wiederum 
sie mit dem Spiegel zeigt... 
Der Grundkurs umfaßt zwei 
Bände, von denen der erste 
gerade erschienen ist (der 
zweite folgt Ende des Jah- 
res). Er enthält neben einer 
Einführung in das Pro- 
gramm Turbo Pascal eine 
recht knapp gehaltene Er- 
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klärung der Schlüsselworte, 
Datentypen und strukturie- 
renden Anweisungen. Pro- 
zeduren und Funktionen 
werden ebenso erklärt wie 
eindimensionale Felder. Der 
Hauptteil des Buches 
schließt mit der Erklärung 
zweier verbreiteter Sortieral- 
gorithmen, Bubble- und 
Quicksort. Im Anhang steht 
eine Zusammenfassung der 
wichtigsten MS-DOS- und 
CP/M-Anweisungen, eine 
Liste des Sprachumfangs 
und Übersichten zur Bedie- 
nung des Compilers. 

Für 29,80 Mark erhält der 
Käufer ein gut gemachtes 
Buch, das sowohl als Be- 
gleitmaterial für Lehrveran- 
staltungen als auch zum 
Selbststudium geeignet ist. 
Für Lehrer ist ein Begleitheft 
(12,80 Mark) erhältlich. (pv) 


Karl-Hermann Rollke: Grundkurs 
Turbo Pascal. Band 1, Sybex Ver- 
lag Düsseldorf. 296 Seiten, 29,80 
Mark. ISBN 3-88745-697-1 


Erste Schritte 
mit MS-DOS 


Der Autor will mit seinem 
Buch in erster Linie Compu- 
terneulinge ansprechen, die 
sich mit dem Betriebssystem 
MS-DOS vertraut machen 
wollen. Er geht in einer 
leicht verständlichen Spra- 
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che Schritt für Schritt von 
der Funktionsweise des 
Computers bis hin zu Pro- 
blemlösungen wie Grafik- 
ausgabe und Recyclingver- 
fahren. Robert Fürst teilt 
die Lernschritte in vier Stu- 
fen auf: In der ersten Stufe 
bespricht er den System- 
start, das Verzeichnis und 
diverse  Darstellungsmög- 
lichkeiten, Warm-Boot und 
Cold-Boot sowie Pro- 
grammaufruf und Wechsel 
der Laufwerke. Danach soll- 
te der Leser in der Lage sein, 
Anwenderprogramme auf- 
zurufen. Die zweite Stufe 
beschäftigt sich mit der Dis- 
kettenverwaltung wie bei- 
spielsweise Disketten-Lage- 
rung, -Behandlung und 
-Formatierung, dem Schreib- 
schutz, Kopieren, Löschen 
und Überschreiben. Der 
dritte Teil beschreibt die ver- 
schiedenen Möglichkeiten 
der Dateiverwaltung von der 
Dateierstellung über Umbe- 
nennung und Löschen bis 
zur Dateiausgabe. Zuletzt 
erläutert der Autor verschie- 
dene MS-DOS-Befehle wie 
Attrib, Xcopy, Prompt, 
Graphics, Mode und Reco- 
ver. Der Anhang enthält den 
ASCII-Zeichensatz und ein 
Stichwortverzeichnis. 


Robert Fürst, „MS-DOS, Einfache 
Zugänge“, tewi-Verlag, München, 
1987, 162 Seiten, ISBN 3-921803- 
73-X, 39 Mark. 


Die Scheu 
vorm 
Computer 


Für viele EDV-Laien ist der 
Computer noch immer ein 
„spanisches Dorf“ und die 
Scheu vor dem ersten Kon- 
takt entsprechend groß. Der 
beste Weg, die Angst vor der 
Maschine zu verlieren, liegt 
im praktischen Umgang mit 
ihr. Um dem Laien diese 
Schwellenangst zu nehmen, 
geht Peter von Eynern in sei- 


nem Buch „Der Schuhlöffel 
zum Computer“ den Um- 
gang mit der rätselhaften 
Maschine Computer bis ins 
kleinste Detail durch. Ey- 
nern versucht durch seine 
Einführungs-Strategie den 
Einstieg für den Leser mit 
direkter Mitarbeit am Rech- 
ner zu unterstützen. Auch 
das scheinbar Selbstver- 
ständlichste wird ausführ- 
lich und für jeden verständ- 
lich beschrieben. Schritt für 
Schritt führt er in die grund- 
legenden Züge der Compu- 
tertechnik ein, geht von der 
Standard-Ausrüstung über 
Funktionsweise des Rech- 
ners zur Arbeit mit Textver- 
arbeitung und Datenbank, 


PetervonEynem 
Der Schuhlöffel zum 
Computer 


Universitas 


um mit Aufbau und Um- 
gang des Betriebssystems am 
Beispiel Unix sowie der Ent- 
stehungsweise von CAD- 
Software abzuschließen. 
Der zweite Teil befaßt sich 
intensiv mit den physikali- 
schen und mathematischen 
Grundlagen der Computer- 
Elektronik. Dabei werden 
die wichtigsten Informatio- 
nen über das Wesen der 
Elektrizität, der elektroni- 
schen Schaltelemente und 
der Schaltelektronik behan- 
delt. Das Buch schließt mit 
einem Sachwortregister ab. 


Peter von Eynern, „Der Schuhlöf- 
el zum Computer“, Universitas 
Verlag, München, 1986, ISBN 
3-8004-1131-8, 156 Seiten, 22 Mark. 


olange Com- 
puterkriminali- 
tät hauptsäch- 
lich eine Domäne 
von Programmierern, Da- 
tenerfassungspersonal und 
Hackern war, nahm man in 
der Öffentlichkeit diese neue 
Form von Verbrechen kaum 
zur Kenntnis. Niemand 
schien sich ernsthaft zu 
beunruhigen. Seitdem die 
Computertechnologie _je- 
doch für weite Kreise er- 
schwinglich und einfacher in 
der Anwendung geworden 
ist, machen sich Datensi- 
cherheits-Beauftragte und 
andere Leute, die sich von 
Berufes wegen mit Daten- 
verarbeitung befassen, gro- 
Be Sorgen. 

Die Computerschwindeleien 
der ersten Stunde zeichneten 
sich durch Genialität und 
Raffinesse aus, der finan- 
zielle Schaden blieb dabei in 
der Regel aber bescheiden. 
Ein paar dürftige Gesetze 
wurden in Eile geschaffen, 
um die neuen Delikte juri- 
stisch in den Griff zu be- 
kommen. Man meinte, da- 
mit die Computerkriminali- 
tät in den Griff zu bekom- 
men. Doch wie es sich heute 
zeigt, ist die Computerkri- 
minalität keineswegs ver- 
schwunden. 

Der Hauptgrund für die stei- 
gende Bedeutung dieser De- 
likte sind die guten Erfolgs- 
aussichten: Betrüger, die 
den Computer als Kompli- 
zen beiziehen, machen pro 
Delikt viel Geld. Und die 
Gefahr, bei der Betrügerei 
erwischt zu werden, ist sehr 
gering, obschon theoretisch 
zahlreiche Kontrollen wie 
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Computer sind heutzutage nicht nur Tatwerkzeuge 
kleiner Gauner. Konzerne, Direktoren, selbst 
höchste Regierungsstellen sind in spektakuläre 
Atfären verwickelt. 


interne Buchhaltungsrevi- 
sionen zur Abschreckung 
und zum Aufspüren der Tä- 
ter existieren. Diese Kon- 
trollen bauen auf der Theo- 
rie auf, daß Direktoren und 
Buchhalter — falls sie selbst 
keine Betrüger sind — auf 
dem Gebiet der technologi- 
schen Möglichkeiten für ein 
Computerdelikt gegenüber 
listigen und korrupten An- 
gestellten einen Wissensvor- 
sprung besitzen. 
Erfahrungen deuten darauf 
hin, daß in der Praxis das 
Gegenteil zutrifft: Die Ver- 
teidigung hinkt hinter dem 
Angriff her. Dabei stellt sich 
die Frage: Beschleunigt die 
Einführung moderner Tech- 
nologien in der Geschäfts- 
welt diesen Vorsprung der 
Kriminellen? 


Das Paradebeispiel der 
Computerdelikte ist der 
Equity-Funding-Fall, der 


sich in den späten Sechziger- 
und frühen Siebziger Jahren 
ereignete: Eine Versiche- 
rungsgesellschaft führte ihre 
Aktionäre während mehre- 
rer Jahre hinters Licht, in- 
dem sie die Umsatzzahlen 
mit fiktiven Policen für fik- 
tive  Versicherungsnehmer 
jährlich um rund 200 Millio- 
nen Dollar nach oben fri- 
sierte. 

Wieso aber wurde dieser 
simple Trick so lange nicht 
aufgedeckt? Dafür gab es 
verschiedene Gründe: 

— Die Kontrolle des Rech- 
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nungswesens war nur unge- 
nügend den Strukturen des 
Unternehmens angepaßt. 

— Die Revisioren besaßen 
ungenügende Kenntnisse 
über das computerunter- 
stützte Rechnungswesen. 

— Sie hatten nicht die not- 
wendige externe und firmen- 
interne Schulung. 

— Sie waren mit dem Wan- 
del des Rechnungswesens 
zuwenig vertraut. 

Das grundsätzliche Pro- 
blem, das sich in diesem und 
in vielen anderen Fällen of- 
fenbarte, ist der tiefe Gra- 
ben zwischen der Computer- 
technologie und der Finanz- 
und Managementkontrolle. 
Wie neuere und ebenso er- 
folgreiche Betrugsaffären 
zeigen, ist es bisher nicht ge- 
lungen, diesen Graben zum 
Verschwinden zu bringen. 
Interessant in diesem Zu- 
sammenhang ist die VW-Af- 
färe, in der die Bücher des 
Automobilherstellerss Wäh- 
rungsverluste in Höhe von 
rund 259 Millionen Dollar 
auswiesen, die es in Wirk- 
lichkeit gar nicht gab. Das 
geschah im Jahre 1984, aber 
die Falschbuchungen bife- 
ben bis im vergangenen 
März unentdeckt. 

Liegt hier ein Fall vor, in 
dem die Computertechnolo- 
gie die Inspiration für einen 
ausgekochten Schwindel lie- 
ferte? Möglich wäre es, ob- 
schon ebensogut Inkompe- 
tenz die Hauptursache sein 
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könnte. Fest aber steht auf je- 
den Fall, daß die Computer- 
technologie die Vertuschung 
der Affäre erleichterte. 

Bei der großen Geldmenge, 
die im weltweiten Überwei- 
sungssystem der Banken 
täglich auf elektronischen 
Konten hin- und hergescho- 
ben wird — man schätzt die 
Menge auf rund 12 Milliar- 
den Mark — ist die Wahr- 
scheinlichkeit groß, daß Be- 
trügereien, Diebstähle und 
Unterschlagungen leicht un- 
tergehen. Man denke dabei 
an den Iran/Contra-Skan- 
dal. 

Eine These lautet, daß die 
Computerkriminalität wei- 
ter zunehmen wird, solange 
nicht ein grundsätzlicher 
Wandel stattfindet. Das 
heißt, daß auf dem Gebiet 
der Finanzkontrolle anstelle 
der ständig hinterherhinken- 
den Feuerwehr Methoden 
mit vorbeugendem Cha- 
rakter treten müssen. Vor- 
beugung bedeutet bessere 
Beobachtung der technologi- 
schen Entwicklung, bessere 
Ausbildung vermehrter und 
frühzeitiger Miteinbezug der 
Revisoren bei der Entwick- 
lung und Einführung neuer 
Computersysteme. 

Selbst wenn all das getan 
würde, wären die Probleme 
der Computerkriminalität 
noch nicht vollständig ge- 
löst. John M. Caroll, Pro- 
fessor an der Western Onta- 
rio University, bemerkte 
dazu:*“ „Die Computersi- 
cherheit gibt es nicht. Es 
gibt jedoch verschiedene 
Ebenen von Computer-Un- 
sicherheiten.“ 

(sch) U 
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B. King hat 
nicht nur einen 
Amiga, sondern 
gleich zwei sol- 
che Maschinen. „Den 
ersten habe ich mir vor über 
einem Jahr zugelegt“, sagte 
er mir Anfang 1987. Derzeit 
stimmte er sich in einem 
New Yorker Hotel gerade 
auf eine Vorstellung ein. 
„Aber ich habe ihn auf Rei- 
sen so vermißt, daß ich los- 
zog und mir noch einen kauf- 
te“. Das ist nun recht high- 
techmäßig für jemanden, der 
sich für seine erste Gitarre 15 
Dollar vom Farmvorsteher 
leihen mußte. 

Die moderne Musik wäre 
nicht dieselbe, hätte er sich 
nicht irgendwann mal diese 
Gitarre zugelegt. King war 
Baumwollpflücker im Mis- 
sissippi-Delta, bevor er 1944 
— gerade 19jährig — nach 
Memphis, dem damaligen 
Musik-Mekka dieses Land- 
striches, trampte. Dort 
machte er sich als „The 
Beale Street Blues Boy“ — 
bald kurz B.B. genannt — 
einen Namen. Mit seiner Gi- 
tarre trat er auf der Straße 
auf; ein Weg zum Ruhm, 
wie ihn schon viele Blues- 
sänger vor ihm gingen. 
Doch als Perfektionist und 
echtes Original hob er sich 
von ihnen ab. In den nach- 
folgenden Jahren widmete 
er sich der Erweiterung und 
Verbesserung einer populä- 
ren Musikrichtung: des 12- 
taktigen Blues, indem er die 
Freiheit im Jazz mit der See- 
le des Gospel verschmolz 
und damit seinen einzigarti- 
gen, persönlichen Stil schuf, 
— einen Stil, den viele Zeit- 
genossen schätzten und 
nachahmten. 


Caledonia und 
Commodore 


B.B.King besitzt einige 
Computer (einen C64, einen 
Compac und einen Tandy 
Color Computer), aber der 
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B.B.KING 5 


AMIGA 


Als den König des Blues kennt man ihn: B.B.King, 

der sich zu einem der meistausgezeichneten Stars 

emporsang. Mit den musikalischen Qualitäten des 
Amiga möchte er sich selbst übertreffen. 


Gemeinsam eine Legende: „B.B.“ und seine „Lucille“. 


Amiga war der erste, der ihn 
musikalisch fesseln konnte. 
Er arbeitet mit „Music Stu- 
dio“, „Soundscape ProMI- 
DI Studio“ und spielte wäh- 
rend unseres Gespräches mit 
„DeluxeMusic Construction 
Set“. „Ich nutze es haupt- 
sächlich zum Erlernen von 
Liedern“, sagte er. Melodien 
gibt er vom Notenblatt ein 
und spielt im richtigen 
Tempo auf Lucille, seiner 
berühmten E-Gitarre, dazu. 
Auch das Ein-„Mausen“ 
von Harmonien, die er dann 
selbst arrangiert, findet er 
ganz brauchbar. Allerdings 
fühlt er sich durch das Vor- 
handensein von nur vier 
Klangkanälen in seiner 


Oktober/87 
TE 


Kreativität beschnitten. 
„Eine nützliche Sache und 
eine Menge Spaß. Wenn ich 
komplizierte Akkorde, z.B. 
9- oder 13-Klänge, verwen- 
de, lasse ich einfach mal den 
Basisklang weg.“ (Und das 
geht wirklich. Ohr und Ge- 
hirn sind von der Natur so 
pfiffig angelegt, daß sie die 
zugrundeliegende Tonhöhe 
ergänzen können, wenn sie 
die restlichen Elemente des 
Akkordes rezipieren.) „Aber 
ich gedenke, mir eins dieser 
Dinger zu besorgen, die ei- 
nem mehrere Stimmen ge- 
ben,“ sagte er. Ich grübelte, 
fragte mich, ob er tatsäch- 
lich eine Methode zum Er- 
zeugen mehrerer interner 


Stimmen kannte. Es stellte 
sich heraus, daß er ein 
MIDI-Interface und einen 
Synthesizer meinte. 

Er erzählte mir von einem 
befreundeten Komponisten 
und Arrangeur, der seine 
Musik zuhause auf Diskette 
aufnimmt und sie dann ins 
Tonstudio bringt; mit MIDI 
schien er allerdings nicht 
sonderlich vertraut. Als er 
erwähnte, er benutze ungern 
eine Klaviatur zur Eingabe, 
erzählte ich ihm von dem 
MIDI-Tonabnehmer für Gi- 
tarre, und er schien recht in- 
teressiert. 


The Thrill is Back 


King bezeichnet sich selbst 
als Bluessänger, aber er ist 
mehr als das — eher eine Le- 
gende. Seit „The Thrill is 
Gone“ (über eine Million 
verkaufte Exemplare im 
Jahr 1967), ist er unbestrit- 
ten der König des Blues. 
Wie man ihn auch nennt, 
B.B.King ist der perfekte 
Performer. Er trat vor über 
17 000 Zuhörern auf, gab 
bis zu 360 Konzerte in einem 
Jahr. Bedenkt man die Hö- 
hen, zu denen er mit Lucille 
und seiner Stimme buch- 
stäblich aufstieg, ist es doch 
spannend, wie er nun den 
Amiga professionell nutzen 
wird. 

King ist musikalischer Auto- 
didakt. Ein Leben lang gab 
er in der ganzen Welt Kon- 
zerte und ergatterte fast jede 
musikalische Auszeichnung, 
die überhaupt möglich war. 
Den Grundstein für seine 
Musikbegeisterung legte ein 
Prediger im Staate Missis- 
sippi, der ihm drei Akkorde 
beibrachte. „Und weißt Du, 
was?“ fragte er mich damals 
in New York rhetorisch, 
„ich spiele sie immer noch“. 
„Auf dem Amiga?“, fragte 
ich. „Auf dem Amiga,“ sag- 
te er grinsend. 
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Bestellung und Versand: 


Telefon (0208) 24047 
BTX 020824048 
Stöckmannstraße 78 
4200 Oberhausen 1 


Qualität ist kein Zufall! 


multiprommer 


Ol Betrieb am Expansionport U Steuer- 
software integriert - sofort betriebsbe- 
reit DI Brennzeiten ab 1 sec/kByte U 
komfortabler Maschinensprachemoni- 
tor mit umfangreichem Befehlssatz ein- 
gebaut. [I Epromtypen: 2516 - 2564, 
2716 - 27512/13, 2816/A, 2817/A, 2864 
alle A- und C-Typen sowie alle pinkompa- 
tible, Vorbereitet fürMegabiteproms und 
Folgetypen. [J Handbuch py 179: 


Testbericht in 64’er 12/86 in RUN 6/87 


DYNAMIC DOS 

Komplett abschaltbar U) 35fach schnel 
ler laden U] 20fach schneller speichern 
El1öfach schnellere Dateizugriffe Dein- 


gebaute Kopierprogramme eingebaute 
Centronics Schnittstelle II 40 Track 
Betrieb (automatische Erkennung) U 


eingebauter Monitor 
DO Hardcopyfunktion DM 249: 


Epromentwicklungs- 
system 


[12* 8 kByte Speicherkapazität I Modul-J) 
Betriebssystem- u. U] Interpreterfunktion DI 
Akku und Rams im Lieferumfang py 79- 


multiprommer 


Speicheroszilloskop 


OlKapazitäts-, Spannungs- und Widerstands- 
meßteil[10szilloskopteil mit vielfältigen Trig- 
germöglichkeiten U] Zeitbasis 0,3 ms bis 
1000 sec U] Hardcopyfunktion [] Messwert- 
speicherung auf Diskette [I Handbuch 


Filialen/Ladenverkauf: 


4019 MONHEIM Zaunswinkelstr. 28 
Tel. (02173) 53708 Andreas Gerzen 


4200 OBERHAUSEN Stöckmannstr. 78 
Tel. (0208) 24047 Thomas Martin 


en ———— 
ÖSTERREICH: SUETRAK HANDELSGES. M.B.H. - MITTERAUEN 31 : A-3003 GABLITZ - TEL. 02231/2170 
SCHWEDEN: PLAMI PRODUKTER : BOX 104 - S-27400 SKURUP - TEL. 0411-32260 

DÄNEMARK: ABSALON DATA - VANGEDEVEJ 216 A - DK-2860 SÖBORG - TEL. 01671193 


Wersand per Nachnahme - Ausland nur Vorauskasse + DM 10,- 


brainy MB1 


OlBis zu 255 Programme im Modulgehäuse das Komplettsystem multiprommer plus 
stehen auf Knopfdruck zur Verfügung [1256 brainy zum Sparpreis von pm 289: 


kByte zusätzliche Speicherkapazität (ent- 
spricht ca. 1024 Blocks auf Diskette) [I 4 
Epromsteckplätze (2764- 27512) UI ohne 
Vorkenntnisse zu Handhaben U) Modulgene- 
rator auf Diskette DJ Modulgehäuse U) aus- 
führliches Handbuch pm 125: 


Betriebssystemum- Adaptersockel 
schaltung shswrzfrei (nutzbar als Betriebssystemumschaltung) 
Beschreibung in 6d'er 7/85 _ pm 11.90 

rn 2-fach om 15.90 
zig-tausendfach bewährt 4-ach om 19.90 
als 2fache DM 257 953912784 om 15.90 
als 4fache DM 32 2364/2764 om 9 


Neu BSS-System Universalstecker- 
256 kByte Ham Erweite netzteil 0114.90 
rung mit leistungstähigem Userportparallel- 
Betriebssystem (multitasking kabel DM 23.95 
fähig) Eproms 

Beschreibung in 64’er 7/87 2764-27512 Tagespreise 


dm 198: (Anruf lohnt!) 

BSS-Ram-Flopp Commodorechips 
DM Ro: 6510 / 6526 / 6522 / 6581 / 

6569 / 825100 / Basic / Kernal / 

Charakter / Tagespreise 

(Anruf lohnt) 


Textoolfassung 


Universalkarte 


Kernal oder Modul (64 kByte) 

Expansionport DM 397 
Betriebssystem- 5 
umschaltung sach om 24: 


für C-128 "29: STARNL-10 
Epromkarte 
8/16/32 köye DM 13.90 
Winkeladapteriür 
Expansionpot DM 17.90 incl. Highterm u. Kabel 
Epromlöschgerät DM 289: 
DM 99: BTX - Term, C-64 
dazu inel. Kabel om 198: 


DM 678: 
DataphonS21D 
DM 259: 


ULTRA DISC 
MONITOR 

Dieses Programm zur universel 
len Diskettenmanipulation - liest 
bis Track 41. Einzeitracktorma 
tierung, automatische Blockver- 
folgung, freier Zugriff auf das 
Floppyram, sowie ein Handbuch 
in deutscher Sprache sind nur 
einige der selbstverständlichen 
Features. Disketten 

version. IM 29: 
BACKGROUND 
MUSIC EDITOR 
Dieses Programm erlaubt ein 
fachste Eingabe komplexer 
Musikstücke sowie komfortable 
Manipulation der SID-Register 
und erzeugt ein Maschinenpro 
gramm mit variabler Start 
adresse. Die Music läuft im 
Interrupt gleichzeitig mit ihrem 
Basic- oder Maschinenpro 
gramm 


hart Desigo 


ei vergleich- 
baren Aufga- 
ben der Muster- 
erkennung wür- 
de selbst ein Cray-Computer 
nur höchst mittelmäßig ab- 
schneiden. Ließen wir je- 
doch das Kind oder selbst 
Einstein eine zehnstellige 
Zahl durch eine dreistellige 
Zahl dividieren, so hätte es 
nicht einmal die Zeit, die 
Zahl zu wiederholen, und 
der Computer hätte bereits 
Vollzug gemeldet. Her- 
kömmliche Computer mit 
der Von-Neumann-Archi- 
tektur sind dafür konstru- 
iert, Algorithmen mechanisch 


abzuarbeiten, und brauchen 
in dieser Disziplin den Men- 
schen wohl niemals zu 
fürchten. Fast alle heutigen 
Rechner gehen auf das 
Rechnerkonzept von John 
von Neumann zurück, der 
Anfang der vierziger Jahre 
folgendes Computermodell 
aufstellte:e Der Computer 
besteht aus vielen Ein-/Aus- 
gabegeräten, zum Beispiel 
Drucker oder Massenspei- 
cher, einem Speicher für 
Programm und Daten ge- 
meinsam und genau einer 
CPU. Der komplette Daten- 
austausch des Computers, 
sowohl Speicher zu Speicher 
als auch Peripherie zu Spei- 
cher, wird allein von der 
CPU durchgeführt. Dies hat 
zur Folge, daß ein solcher 
Computer immer nur eine 
Aufgabe zur selben Zeit be- 
arbeiten kann. Auch wenn 


heutige Computer multitask- 
ingfähig sind, bedeutet das 
auch nur, daß der Computer 
sehr schnell von einer Auf- 
gabe zur nächsten wechselt. 
Das Gehirn kann jedoch 
mehrere Aufgaben echt par- 
allel durchführen, zum Bei- 
spiel telefonieren, dabei eine 
Notiz aufschreiben und dar- 
auf achten, daß die Milch 
auf dem Herd nicht über- 
kocht. Das menschliche Ge- 


kunde die ganze Sonate re- 
konstruieren kann, so wird 
der immer noch enorme Lei- 
stungsunterschied zwischen 
dem menschlichen Gehirn 
und der herkömmlichen 
Computerarchitektur mit ih- 
rer an sie angepaßten Soft- 
ware bei der Behandlung 
von Zufallsproblemen klar. 
Einen kleinen Überblick 
über die Leistungsfähigkeit 
des menschlichen Gehirns 


AUF DEM WEG 
ZUR LERNENDEN MAOGHINE 


Wenn ein dreijähriges Kind mühelos einen Opel, einen Mercedes und einen 

Audi aus einer Reihe anderer Gegenstände als Autos identifiziert, so käme 

keiner auf die Idee, dieses Kind als kleinen Einstein anzusehen, das jedem 
existierenden Gomputer weit überlegen ist. Und doch ist es so. 


hirn besitzt jedoch auch die 
unübertroffene Begabung 
zur Bewältigung von Zu- 
fallsproblemen, wie die Mu- 
stererkennung eines dar- 
stellt. Die Fähigkeit zur 
komplexen Assoziation, die 
hinter dieser Art von Pro- 
blemen steckt, ist eine der 
Kriterien, mit der Psycholo- 
gen den Intelligenzquotien- 
ten eines Menschen zu be- 
stimmen versuchen. 


Gehirn versus 
CPU 


Bedenkt man, daß der 
Mensch eine Person auf ei- 
nem Jugendphoto wiederer- 
kennen kann, obwohl da- 
zwischen vielleicht siebzig 
Jahre liegen mögen, oder 
daß er aus dem Rhythmus 
und Takt eines Fetzen Mu- 
siks, die ihm der Wind zu- 
trägt, im Bruchteil einer Se- 
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sollen folgende Zahlen ver- 
mitteln: Geht man davon 
aus, daß allein unsere visuel- 
len Sinnesorgane, unsere 
Augen, 2*10!® Rezeptoren 
besitzen, die über 2*10!® 
parallel zum Hirn führende 
Fasern eine Kanalkapazität 
von 107 Bit/s haben, von 
denen immerhin noch 40 
Bit/s bewußt wahrgenom- 
men werden können — man 
bezeichnet dies als die psy- 
chophysische Kanalkapazi- 
tät; dies ist etwa soviel, wie 
alle anderen Sinne zusam- 
men — so wird klar, welche 
enormen Datenmengen un- 
ser Gehirn im Laufe unseres 
Lebens verarbeiten, aufbe- 
reiten und speichern muß. 
Von den bewußt aufgenom- 
menen Informationen ver- 
gessen wir so gut wie nichts 
mehr, auch wenn auf die In- 
formation nicht immer und 


zu jeder Zeit aktiv zugegrif- 
fen werden kann. 

Um diesen Unterschied 
grundsätzlich, d.h. nicht 
durch noch schnellere Com- 
puter, sondern durch eine 
andere Architektur, zu ver- 
ringern, wenn nicht sogar 
ganz zu nivellieren, sind in 
den letzten Jahren Compu- 
terwissenschaftler und Hirn- 
forscher in engeren Kontakt 
getreten. Die einen wollen 
mehr über die Hirnfunktio- 
nen und deren Substrate er- 
fahren, die Neurowissen- 
schaftler wiederum benut- 
zen mehr und mehr die ent- 
standenen Computersimula- 


tionen und Modelle, um Hy- 
pothesen zu erhalten, die sie 
im Experiment dann über- 
prüfen können. Die Vorstel- 
lung ‘einer Computerarchi- 
tektur, die auf dem Prinzip 
des „parallel distributed 
processing“, sinngemäß mit 
„parallel verschalteter Ver- 
arbeitung“ zu übersetzen, 
basiert, ist letztlich auch ein 
Produkt dieser Zusammen- 
arbeit. Die gegenseitige Be- 
fruchtung zeigt bereits grö- 
Bere Auswirkungen. War 
noch bis vor ein paar Jahren 
vorwiegend von hierarchi- 
scher, das heißt stufenwei- 
ser, also serieller Informa- 
tionsverarbeitung bei biolo- 
gischen Systemen die Rede, 
so hat sich mittlerweile bei 
den meisten auf relevanten 
Gebieten arbeitenden Wis- 
senschaftlern, zum Beispiel 
den Neuroethologen — sie 


beschäftigen sich mit den 
neuralen Grundlagen des 
tierischen Verhaltens — die 
Erkenntnis durchgesetzt, 
daß die von diesen Systemen 
gezeigten meist hoch kom- 
plexen Input-Output-Bezie- 
hungen nur durch parallele 
Verarbeitungsstufen auf 
zentralnervöser Ebene zu er- 
klären sind. 

In diesem Zusammenhang 
ist in den USA die Disziplin 
der „Cognitive Science“ ent- 
standen, die sich vor allem 
der Simulation von „neural 
networks“ verschrieben hat. 
Diese neuralen Netzwerke 
sollen so vielfältige Anwen- 
dungen wie Sprachperzep- 
tion, also Verarbeitung von 
gesprochener Information, 
Orientierung im Raum und 
visuelle Mustererkennung, 
zum Beispiel Lesemaschi- 
nen, ermöglichen, aber auch 
Aufschluß geben über Ver- 
rechnungen im peripheren 
und zentralen Nervensy- 
stem, Interaktion von pyra- 
midalen Cortexzellen, ein 
zentraler Nervenzelltypus in 
der Hirnrinde des Groß- 
hirns, und die Funktions- 
weise von assoziativem Ge- 
dächtnis. 

Diese noch sehr junge Wis- 
senschaft fängt gerade an, 
auch in Deutschland auf 
breiter Basis Fahrt zu gewin- 
nen, kann dabei allerdings 
auf bekannte Bastionen zu- 
rückgreifen, so auf das 
Max-Planck-Institut für 
Biologische Kybernetik in 
Tübingen. Einer der vier Di- 
rektoren, der bekannte 
Hirnforscher und gebürtige 
Italiener Valentin Braiten- 
berg, verdiente seine ersten 
wissenschaftlichen Meriten 
durch sein „Funktionsmo- 
dell des zellulären Netz- 
werks der Kleinhirnrinde“, 
und dies bereits 1958. 

Um den Wissensaustausch 
zu beschleunigen, trifft sich 
eine Gruppe international 
renommierter Wissenschaft- 


ler der Disziplinen Neuro- 
wissenschaft, Computerwis- 
senschaft und Robotics im 
August in Kassel zu einem 
Workshop, auf dem am Bei- 
spiel der Amphibien (Krö- 
ten, Frösche, Salamander) 
visuelle Mustererkennung 
und visumotorische Koordi- 
nation im Experiment, im 
Modell und von der Anwen- 
dungsseite her (Industriero- 
boter) diskutiert werden sol- 
len. Auf Einladung von 
Prof. Jörg-Peter Ewert, 
Universität Kassel, und 
Prof. Michael Arbib von der 
University of California, einem 
berühmten Pionier auf dem 
Gebiet der Biokybernetik, 
findet dieses Treffen im Au- 
gust in Kassel statt. Dieses 
Treffen ist das dritte in die- 
ser Reihe, die vorigen fan- 
den in den USA und Mexico 
statt. 


Frösche und 
Kröten 
statt Computer 


Frösche und Kröten sind 
bei den Neuroethologen 
und Computerwissenschaft- 
lern besonders beliebt. Den 
Grund liefert die Evolution. 
Amphibien stehen auf der 
niedrigsten Stufe der Land- 
wirbeltiere und besitzen 
noch keinen Cortex (Groß- 
hirnrinde). Sie zeigen aber 
trotzdem Sinnesleistungen, 
die denen der Säugetiere 
nicht viel nachstehen. Auch 
komplexere assoziative Kon- 
ditionierungen sind in letzter 
Zeit an Erdkröten erfolg- 
reich durchgeführt worden. 
Als assoziative Konditionie- 
rung bezeichnet man folgen- 
des Experiment: Ein Tier 
lernt, zwei verschiedene Rei- 
ze miteinander zu verbin- 
den. Ein berühmtes Beispiel 
bilden die Pawlowschen 
Hunde. Ein Hund reagiert 
beim Zeigen von Fleisch mit 
Speichelfluß, „ihm läuft das 
Wasser im Munde zusam- 
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men“. Wenn nun gleichzei- 
tig mit dem Zeigen des Flei- 
sches eine Glocke ertönt, so 
passiert es nach einiger Zeit, 
daß der Speichelfluß ein- 
tritt, wenn nur die Glocke 
geläutet wird. Der Hund as- 
soziiert also die Glocke mit 
dem Fleisch. Ähnliches 
kann man auch Erdkröten 
beibringen. Sie können also 
nicht nur ihre genetisch fi- 
xierten Programme abspu- 
len, sondern auch ihr Ver- 
halten an eine veränderte 
Umwelt anpassen. Diese 
Leistungen vollbringen sie 
mit nur etwa 50 Millionen 
Hirnzellen des Zentralner- 
vensystems, während beim 
Menschen dafür mehr als 
100 Milliarden Nervenzellen 
beteiligt sind. Wer heutzuta- 
ge einen Frosch küßt, muß 
also durchaus damit rech- 
nen, statt eines tumben, 
aber reichen Prinzen, einen 
klugen, aber armen Studen- 
ten befreit zu haben. Bevor 
man sich an die fast unvor- 
stellbar komplexe Verschal- 
tung der Großhirnrinde 
wagt, kommt die relativ ein- 
fache Struktur des Kröten- 
hirns gerade recht, um 
grundsätzliche Baupläne der 
Natur kennenzulernen und 
das daraus gewonnene Wis- 
sen in Computersimulatio- 
nen zu stecken. 

Erdkröten, wie alle bisher 
untersuchten Amphibien, 
lösen eine für den Computer 
nur schwer zu lösende Mu- 
stererkennungsaufgabe mit 


beneidenswerter Leichtig- 
keit. Kriecht ihnen ein 
wurmförmiges Objekt in 


Schnappdistanz durch das 
Gesichtsfeld, so wendet sich 
die Erdkröte danach und 
schnappt, sobald das Objekt 
sich im binokularen Ge- 
sichtsfeldausschnitt befin- 
det, also der Teil des Ge- 
sichtsfeldes, der von beiden 
Augen gesehen wird. Eine 
schwarze, automatisch um 
das Tier herum bewegte 


wurmförmige Attrappe pas- 
sender Größe, also nicht zu 
klein und nicht zu groß, 
eben wurmgroß, täuscht das 
Tier und löst das gleiche 
Beutefangverhalten aus, das 
Tier versucht den „Wurm“ 
zu schnappen. Sie wirkt also 
als angeborener Schlüssel- 
reiz. Drehen wir das Muster 
um 90 Grad, so daß es sich 
aufrecht fortbewegt, ein so- 
genannter Antiwurm, wird 
kein erkennbares Verhalten 
ausgelöst. Ein auf dem Kopf 
gehender Wurm kommt im 
— angeborenen — Beute- 
fangschema der Erdkröte 
nicht vor (Fig.1). 


Selektive 
Musterwahrneh- 
mung 


Nur bewegte Muster werden 
von Amphibien wahrge- 
nommen. Damit sind die 
wichtigsten — stark verein- 
facht — von dem Tier zu lö- 
senden Probleme klar: Zu- 
erst muß das Objekt identi- 
fiziert werden, bewegt sich 
der Streifen quer oder paral- 
lel zur Bewegungsrichtung? 
Danach muß das Muster lo- 
kalisiert werden, die Kröte 
prüft, ob sich das Objekt im 
seitlichen oder im frontalen 
Gesichtsfeld befindet, d.h., 
muß sich die Kröte noch- 
mals nachwenden oder kann 
sie gleich schnappen. Je 
nach Ausgang der beiden 
Prüfungen werden dann die 
unterschiedlichen motori- 
schen Programme in der 
Medulla oblongata (verlän- 
gertes Rückenmark) ausge- 
löst. 

Zwischen Vertikal- und Ho- 
rizontalstreiffen zu unter- 
scheiden, ist eines der klas- 
sisch schwierigen Probleme 
für einen linearen Schwel- 
lenwertapparat, wie das Per- 
zeptron es darstellt. Grund- 
sätzlich sind nämlich verti- 
kale und horizontale Strei-$® 
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fen oder Linien nicht linear 
separierbar und benötigen 
ein vielschichtiges Perzep- 
tronsystem, um sie zu unter- 
scheiden — Erläuterungen 
zum Perzeptron-Modell und 
linearer Separierbarkeit sie- 
he weiter unten. 

In der Simulation stellen wir 
deshalb erst die wesentlich 
einfachere Diskrimination 
(Erkennung) von Elementen 
des ASCII-Satzes, wie Buch- 
staben und Zahlen, vor. 
Zunächst aber ein kurzer hi- 
storischer Überblick über 
die Entwicklung der Kyber- 
netik und Künstlichen Intel- 
ligenz und Informationen 
zum heutigen Stand der Din- 
ge. 

In den 50er Jahren wurde 
der Begriff der Kybernetik 
— aus dem Griechischen 
Cybernetes = Steuermann 
— geprägt und populär. 
Den Grundstein legte im 
Jahre 1948 Norbert Wiener 
in seinem Buch Kybernetik 
— Regelung und Nachrich- 
tenübertragung im Lebewe- 
sen und in der Maschine. 


Neurobiologie 
löst 


ru 


Schlagworte wie Perceptron 
(von Rosenblatt) oder Rech- 
nender Raum (von Zuse) 
entstanden in einer Synthese 
aus solch unterschiedlichen 
Disziplinen wie Wahrneh- 
mungspsychologie, Neuro- 
biologie, Mathematik und 
Informatik. 

Die Zielsetzung der Neuro- 
wissenschaftler und Wahr- 
nehmungspsychologen be- 
steht in der Suche nach ma- 
thematischen Modellen, um 
damit ihre Hypothesen zu 
Wahrnehmungsprozessen 
und der natürlichen Infor- 
mationsverarbeitung zu 
überprüfen. Das Ziel der 
Informatiker bestand auch 
damals schon aus dem 


msi 


Verlangen, intelligentere 
Computer zu konstruieren. 
Als Ende der 60er Jahre 
durch mathematische Ana- 
lysen (von Minsky und Pa- 
pert, ca.1969) die beschränk- 


te Leistungsfähigkeit des 
Perceptron-Konzeptes of- 
fenbar wurde, verfiel die 


Kybernetik in einen langen 
und tiefen Schlaf; einige 
würden diesen Zeitpunkt so- 
gar als das Ende des Begriffs 
Kybernetik bezeichnen. In 
jedem Fall verlor man das 
Interesse. 


Sackgasse 
Perzeptron- 
mode 


Das Perceptron ist eine ein- 
schichtige Anordnung von 
Zellen, die alle ein vorgeleg- 
tes Bild beobachten und je 
nach Bildmerkmalen unter- 
schiedlich stark darauf rea- 
gieren. Bei geeigneter Spe- 
zialisierung auf gewisse 
Merkmale sollte es möglich 
sein, so die Meinung vor 
1969, einzelne Zellen für be- 
liebige Wahrnehmungsauf- 
gaben einzusetzen. Zumin- 
dest dieser einfache Ansatz 
erwies sich als nicht mächtig 
genug, alle gestellten Erken- 
nungsaufgaben zu lösen. 

Nachdem seit Anfang der 
80er Jahre neue Begriffe wie 
„Künstliche Intelligenz“ und 
„5. Generation“ Furore 
machten, lieferten Resultate 
der Neurobiologie neue An- 
sätze für die alten Probleme 
der Kybernetik; schließlich 
ist das beste Vorbild für die 
angestrebte „Künstliche In- 
telligenz“ immer noch die 
natürliche. Dies mag nicht 
nur für die Methoden, son- 
dern auch für die physikali- 
sche Realisierung gelten. 
Modellvorstellungen aus der 
Wahrnehmungspsychologie 
werden derzeit bereits erfolg- 
reich in der „Künstlichen In- 
telligenz“ angewendet: Ge- 
nannt sei hier nur stellvertre- 
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tend das Frame-Konzept, 
von Minsky am MIT entwik- 
kelt, das komplexe Wahr- 
nehmungssituationen mit 
Hilfe von Standardannah- 
men — Defaults — hierar- 
chisch zerlegt. Als Beispiel: 
Alle Computer haben eine 
serielle Schnittstelle, nur der 
IBM hat keine. 

Seitdem man die prinzipiel- 
len Schwächen der klassi- 
schen Computerarchitektu- 
ren durch parallele Konzep- 
te zu überwinden sucht, bie- 


schwierigen Synchronisa- 
tionsproblemen. 

Der klassische Computer 
verarbeitet Daten mit Hilfe 
von Algorithmen, neurona- 
le/zelluläre Netze verarbei- 
ten dagegen zum Beispiel 
Bilder ausschließlich durch 
Vergleiche und Gewichtun- 
gen. Der klassische Compu- 
ter wird von Informatikern 
und Mathematikern ab- 
strakt als Turing Maschine 
bezeichnet. Er greift auf 
eine Art Magnetband lesend 


Fig.1: Die Figur zeigt, wie mit Hilfe einer feinen Mikroelektrode (E) aus 
dem freigelegen Mittelhirndach der Erdkröte Aktionspotentiale (AP) 
abgeleitet, verstärkt und sichtbar gemacht werden können. 


tet sich hochgradige Paral- 
lelität der Ausführung in 
neuronalen Netzen ohne ge- 
meinsame globale Speicher 
in natürlicher Art und Weise 
an. Der Von-Neumann- 
’sche-Flaschenhals: Daten 
werden sequentiell aus dem 
Arbeitsspeicher in den Pro- 
zessor eingelesen, dort ver- 
arbeitet und anschließend 
wieder sequentiell in den 
Speicher zurückgeschrieben; 
paralleles Arbeiten auf ge- 
meinsamen Speichern führt 
bei heutigen Multiprozes- 
sorarchitekturen oft zu 


und schreibend zu und än- 
dert dabei seinen internen 
Zustand bei jedem Arbeits- 
schritt; verschiebt das Band 
jeweils um eine Position vor 
oder zurück. Zelluläre Netze 
bestehen aus relativ einfa- 
chen Zellen, die mit ihren 
Nachbarzellen kommunizie- 
ren und dabei entsprechend 
vorgegebener Regeln ihre 
Zustände verändern; ein be- 
kanntes Beispiel für ein zel- 
luläres Netz ist das bekannte 
Computerspiel Life (erfun- 
den von Connway, gefürch- 
tet von allen Rechenzentren). 


Klassische Computer werden 
programmiert, Netzwerke 
dagegen auf bestimmte Auf- 
gaben trainiert. Dieses Trai- 
ning besteht oft darin, daß 
durch wiederholtes Probie- 
ren und leichtes Verändern 
der Werte die gewünschte 
Funktion erreicht wird. Da- 
bei ist die genaue Form des 
Resultats meistens vorher 
nicht exakt zu bestimmen. 
Eine Erklärung des wesentli- 
chen Unterschiedes folgt 
weiter unten anhand von 


Eingabe 


Ausgabe 


Schema McCulloch-Pitts-Neuron 


Beispielen. Ein erstes Mo- 
dell für die „biologischen“ 
Neuronen bildet das McCul- 
loch-Pitts Neuron, erfunden 
Anfang der fünfziger Jahre. 
Neuronale Netze als Spezial- 
fall zellulärer Netze werden 
oft aus diesen Modellneuro- 
nen aufgebaut. 

Diese Neuronen beschreiben 
reale Neuronen durch ein 
mathematisches Modell: Je- 


“ WISSEN 


des Neuron verfügt über eine 
Anzahl von Eingängen, von 
denen jeder mit einem Ge- 
wichtsfaktor versehen ist, 
eine Schwellenwertlogik so- 
wie einen Ausgang. Die Ein- 
gangsdaten werden mit den 
zugeordneten Gewichtsfak- 
toren multipliziert und dann 
aufsummiert. Diese Summe 
vergleicht das Neuron mit ei- 
nem vorgegebenen Schwel- 
lenwert, und falls dieser 
Wert erreicht oder über- 
schritten worden ist, produ- 
ziert das Neuron eine I an 
seinem Ausgang (das Neuron 
„feuert“), anderenfalls eine 
0. Positive Eingangsfaktoren 
wirken daher anregend auf 
das Neuron, wogegen negati- 
ve Gewichte dämpfenden 
Einfluß haben. Die Modell- 
vorstellung eines Bool’schen 
Neurons (das nur die Werte 0 
und 1 liefern kann) ist natür- 
lich nur eine grobe Nähe- 
rung. Reale Neuronen sind 
von ihrem Schaltverhalten, 
wenn überhaupt, eher mit 
Analog- als mit Digitalrech- 
nern vergleichbar! 


20M b 
Sekun 5 als Re: 
Transputer 


Solche Neuronen und die 
aus ihnen gebildeten Netze 
können natürlich auf klassi- 
schen Computern simuliert 
werden, was wir weiter un- 
ten zeigen. Die prinzipielle 
Vorgehensweise ist in dem 
folgenden Absatz detailliert 
erklärt und sollte den begab- 
ten Computerenthusiasten 
in die Lage versetzen, ein ei- 
genes Simulationsprogramm 
dazu zu entwickeln. Spätere 
direkte Umsetzung eines si- 
mulierten neuralen Netz- 
werks in Hardware ist 
durchaus möglich und wür- 
de natürlich eine wesentlich 
höhere Arbeitsgeschwindig- 
keit ermöglichen. Dies kann 
leicht durch kleine Ein- 
Chip-Mikroprozessoren er- 
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reicht werden, mit wenig 
RAM und ROM. Erste 
Schritte in die Richtung auf 
parallel arbeitende Prozes- 
sornetze bilden zum Beispiel 
die Transputer, von der bri- 
tischen Firma INMOS ent- 
wickelt; dies sind vier neuar- 
tige 32-Bit Mikrocomputer, 
jeder mit eigenem RAM, die 
nicht mehr einen klassischen 
Systembus benutzen, son- 
dern mit 10 bis 20 MByte/ 
sec. über vier serielle Hoch- 
geschwindigkeitsports 
(Links) Daten mit ihren be- 
nachbarten Chips austau- 
schen 
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ascal verar- 
beitet Dateien 
ähnlich wie Ba- 
sic, bietet jedoch 
komfortablere Pro- 


viel 
grammiermöglichkeiten: Je- 


der Datentyp (CHAR, 
STRING, INTEGER, 
REAL, BYTE, aber auch 
RECORD) kann als Grund- 
element einer Datei definiert 
werden. Hinzu kommen 
Textdateien und unstruk- 
turierte Dateien. 

Dateien sind in Turbo-Pas- 
cal als „Kanäle, durch wel- 
che die Programme Daten 
übertragen können“ defi- 
niert. Meist wird der Pro- 
grammierer als Ein- und 
Ausgabegerät eine Disket- 
tenstation oder (beim Amiga 
mit MS-DOS) die Festplatte 
wählen, er kann aber auch 
logische Geräte wie Bild- 
schirm und Tastatur als Da- 
tei ansprechen. Zur Aus- 
wahl stehen die logischen 
Geräte CON: (Konsole), 
KBD: (Tastatur), LST: 
(Standarddrucker), AUX: 
(serielle Schnittstelle) und 
USR: (selbstdefiniertes Ge- 
rät). Doch diese Optionen 
werden selten genutzt, ledig- 
lich das Eingabegerät KBD: 
ist gelegentlich zur Eingabe 
ohne Bildschirmecho, wie es 
READ(var) erzeugt, not- 
wendig. Die Anweisung 
READ(KBD,buchstabe) 
liest ein Zeichen von der Ta- 
statur in die Variable buch- 
stabe (Typ CHAR), ohne 
den Bildschirm zu benutzen. 
Geräte können ohne vorhe- 
rige Deklaration benutzt 
werden. Dagegen müssen 


runs 


VON BAdIG ZU PASCHL 
TEILd 


Programme müssen Daten auf Diskette speichern 
und von dort einlesen. Pascal macht diese 
Operationen leicht; mehrere Dateitypen liefern für 
jedes Problem die passende Lösung. 


Diskettendateien im Dekla- 
rationsteil des Programms 
beschrieben werden: Eine 
sequentielle Datei entsteht 
durch die Definition einer 
Datei (FILE) des Typs 
CHAR. 
PROGRAM SEQDATEI; 
VAR 

seq : FILE OF CHAR; 
Alternativ zum Bezeichner 
CHAR ssind alle anderen 
Datentypen wie INTEGER, 
REAL oder STRING, aber 
auch RECORD zugelassen. 
Eine sequentielle Datei mit 
Elementen des Typs INTE- 
GER wird durch 
VAR 

seq : FILE OF INTEGER; 
beschrieben. 
Nun geht es ans Öffnen ei- 
ner Datei. Es ist immer sinn- 
voll, das Öffnen und Schlie- 
Ben einer Datei in eine eige- 
ne Prozedur zu legen, denn 
dadurch wird das Pro- 
gramm übersichtlicher, Feh- 
ler lassen sich leichter korri- 
gieren und die Prozeduren 
können in andere Program- 
me übertragen werden. 
Der Bezeichner ASSIGN 
ordnet der Datei einen Da- 
teinamen zu. Die Anweisun- 
gen REWRITE und RESET 
erzeugen bzw. öffnen an- 
schließend die Datei. Wäh- 
rend REWRITE eine even- 
tuell bestehende Datei stets 
löscht und so alte Datenbe- 
stände vernichtet, öffnet 
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RESET eine bestehende Da- 
tei. Sollte keine Datei mit 
dem angegebenen Namen 
existieren, wird eine Fehler- 
meldung ausgegeben; das 
Programm hält an. 


PROGRAM segdatei; 
VAR 
seq : FILE OF CHAR; 
PROCEDURE offne; 
BEGIN 
ASSIGN (seq,’test’); 
REWRITE(seg); 
END; 
PROCEDURE schreibe; 
VAR 
x: INTEGER; 
buchstabe : CHAR; 
BEGIN 
FOR x := 65 TO 127 DO 
BEGIN 
buchstabe :=CHARA); 
WRITE,’ ’); 
WRITE (seg,buchstabe); 
END; 
END; 
PROCEDURE schliesse; 
BEGIN 
CLOSE(seg); 
END; 
BEGIN 
offne; 
schreibe; 
schliesse; 
END. 


Dieses Programm enthält 
die Prozeduren offne, 
schreibe und schliesse, die in 
dieser Reihenfolge ausge- 
führt werden. 


Es schreibt die Buchstaben 
mit den ASCII-Codes 65 bis 
127 in die Datei ’test’. Sie 
wird in der Prozedur offne 
erzeugt und anschließend in 
der Prozedur schreibe mit 
den gewünschten Zeichen 
gefüllt. Die Anweisung 
WRITE (seq,buchstabe) 
übernimmt die Ausgabe in 
die Datei. 
In Pascal kann jede WRITE- 
und READ-Operation auf 
eine Datei umgeleitet wer- 
den, indem in der Klammer 
nach WRITE als erstes die 
Datei bezeichnet wird. In 
diesem Fall ist die Datei seq 
aufgeführt. 
Die Typdefinition erfolgte 
bereits im Deklarationsteil: 
Dort steht seq : file of char; 
Die Datei ’seq’ besteht also 
nur aus Buchstaben. 
Die gespeicherten Daten sol- 
len nun wieder in den Rech- 
ner eingelesen werden. Der 
Unterschied zum Schreiben 
ist nicht groß: In der Proze- 
dur offne wird das Schlüs- 
selwort REWRITE durch 
RESET ersetzt, denn RE- 
WRITE würde definitions- 
gemäß die angesprochene 
Datei löschen, was einen Le- 
seversuch sinnlos macht. 
Also wird RESET benutzt. 
Die Prozedur schreibe wird 
durch lese ersetzt. Sie holt 
die gespeicherten Zeichen 
aus der Datei und gibt sie 
auf dem Bildschirm aus: 
PROGRAM segdatei; 
VAR 

seq : FILE OF CHAR; 
PROCEDURE offne; 
BEGIN 

ASSIGN(seq,’test’); 


RESET(seg); 
END; 
PROCEDURE lese; 
VAR 
x :INTEGER; 
buchstabe : CHAR; 
BEGIN 


FOR x := 65 TO 127 DO 
BEGIN 
READ(seq,buchstabe); 


WRITE(buchstabe,’ ’); 
END; 
END; 
PROCEDURE schliesse; 
BEGIN 
CLOSE(seg); 
END; 
BEGIN 
offne; 
lese; 
schliesse; 
END. 
Jedes Programm soll unter 
allen Betriebsverhältnissen 


EPROM-BRENNER 

32 K fertig im Gehäuse, mit Soft-Disk 
32 K dito, jedoch als Bausatz 

64 Kertig im Gehäuse, mit Soft-Disk 
64 K dito, jedoch als Bausatz 


EPROM-KARTEN 
16K(2x 8K) 2716-84 Duo-Modulkarte 
32 2K 2116 KundBSU) Variante 
56 K (8x 2716-32) mit Soft-Eprom 
256 K, dito, jedoch als Bausatz 
1 MB (16x 2764/256/512) mit Soft-Eprom 


BETRIEBSSYSTEM-UMSCH.-PLATINEN 
1x alt/1x neu mit Umschalter 

1x alt/1x neu dito, absturzfrei 

1x alt/6x neu dito (auf 4 sent: 

1x alt/2x neufürC 128/Dm. Schalt 
4x BSund4x 8K Modul, Kombikarte 
dito, jedoch direkt für Expansionsport 
ADAPTER-SOCKEL 

Für ROMs 24/28polg 1x Boder 16K 
Für ROMs 24/28poligfür 4x8 K + Schalt. 
dito, jedoch für C 128/D 3fach 


Nr. 9528 DM 
Nr. 9509 DM 


Nr. 9598 DM 
Nr. 9594 DM 
Nr. 9595 DM 27.80 
Die Artikel 9594 + 95 sind besonders klein (ca. 22x40 mm) 
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fehlerfrei arbeiten. Auch 
wenn Dateien fehlen, darf es 
nicht zu einer Konfusion 
kommen. Daher muß für 
den Fall, daß die Datei ’test’ 
nicht existiert, eine Sicher- 
heitsroutine eingebaut wer- 
den. Sie soll einen verständ- 
lichen Text ausgeben, der 
auf den Fehler hinweist. 
Compilerdirektiven veran- 
lassen Turbo-Pascal, die 
automatische IO-Kontrolle 
an den Programmierer ab- 
zugeben. Die Direktive /$I-) 
schaltet die automatische 
Kontrolle aus; der Program- 
mierer muß sie mit der An- 
weisung IORESULT selbst 
übernehmen. |$I-| nimmt die 
Direktive wieder zurück. 
IORESULT ergibt den Wert 
Null, wenn kein Fehler beim 
Öffnen einer Datei auftrat. 


Die Prozedur offne wird um 
einige Anweisungen erwei- 
tert: 


PROCEDURE offne; 
BEGIN 
ASSIGN (seq,'test.tst”); 
($I-) 
RESET(seg); 
$I+); 
IFIORESULT < >0THEN 
BEGIN 
WRITELN('Die Datei 
TEST ’); 
WRITELN( existiert 
nicht!’); 
HALT; 
END; 
END; 


Ab jetzt überprüft IORE- 
SULT bei jedem Programm- 
lauf die Dateieröffnung. 
Tritt ein Fehler auf, ist das 


DREH 


Ergebnis ungleich Null und 
die IF-Abfrage verzweigt zu 
der Fehlermeldung. Die An- 
weisung HALT bricht das 
Programm ab. 


IORESULT sollte in allen 
anwenderfreundlichen Pro- 
grammen eingebaut werden, 
um verständliche Fehlermel- 
dungen programmieren zu 
können. 


Ein internes Zeigersystem, 
das stets auf die aktuelle 
Komponente in der Datei 
zeigt, erleichtert die Datei- 
operationen. Der Zeiger 
orientiert sich nicht an der 
Anzahl der Bytes, sondern 


an den Komponenten. Be- $ 
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Andreas König electronic, Stresemannstraße 11, 5800 Hagen 1, Telefon 0 23 31/1 69 79 


DAS SPITZENZUBEHÖR C 64/123/16 


DOS-KABEL 


dito, jedoch für Floppy 1570/71 
REX DOS (FLOPPY SPEEDER) 


Eproms sowie Kabel 
MODULE der Superlative! 


1 Jahr Garantie! 


352885 i 28: 
ses sEssss Busse Ses5 


nm 
So 


Für paralleis DOS-Übertragung + Reset 
dito, jedoch durchgeführter Userport 


Das schnelle Übertragungssystem, ca, 10x schneller Laden, Ver- 
ity, Saven. F-Tasten-Funktionen. Komplett mit allen Platinen und 


Alle Module im Gehäuse, mit Resettaster, guter Beschreibung und 


HYPRA-DISK-MODUL 7x schneller laden/ver 
HARDCOPY-TURBO-MODUL 7 x Tempo,Copy uva. 
EPROM-MODUL-GENERATOR für Autostartprg. 
FORMAT-HARDCOPY-TURBO-M. mit Formatierung 
HYPRA-TAPE-MODUL 10x Tempo/lad/save/ver. 
MONITOR-MODUL, mit Turbomod/ID-Changer 
128er MODUL für 64er Mod. 6x Tempo 1570/71 
SUPER-UNIVERSAL-MODUL, erfüllt alle hier 

a nen Funktionen, außer 9541/45/9604 
LIGHTPEN-MODUL, malen und befehlen via 
PICTURES-PRINTER-MODUL, druckt alle Bilder 
auf fast allen Druckern, Okimate 20 in color 
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ACHTUNG 


Bitte fordern Sie unseren großen vierfarbi- 


gen KATALOG an. Dort finden Sie viele wei- 


Nr. 9617 DM 99,50 


tere Computerzubehörs. Hier ist nur eine 
kurze Programmnübersicht möglich. 


Sie können auf dem Versandweg direkt bei 


uns bestellen: REX DATENTECHNIK, Strese- 


mannstr. 11, 5800 HAGEN 1, Tel. 023 31/ 
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steht die Datei aus Buchsta- 
ben (CHAR), ist der Unter- 
schied nicht zu merken, 
denn jedes Element besteht 
aus einem Byte — dem ge- 
speicherten Buchstaben. Bei 
anderen Datei-Typen (IN- 
TEGER, REAL, STRING, 
RECORD) ist eine Kompo- 
nente länger als ein Byte, der 
Zeiger ist nach einer Positio- 
nierung stets auf den Beginn 
eines Eintrags (Zahl, Zei- 
chenkette oder Record) ge- 
richtet. Diese Einrichtung 
erleichtert den Umgang mit 
Diskettendateien sehr. Fol- 
gende Anweisungen nutzen 
das Zeigersystem: 

SEEK (FilVar,n) sucht in 
der Datei FilVar die n-te 
Komponente. SEEK(seq,2) 
positioniert den Dateizeiger 
auf den zweiten Eintrag in 
der Datei seq. Die nächste 
Leseanweisung holt dann 
diesen Eintrag aus der Da- 
tei. 

FILESIZE(FilVar) gibt die 
Größe der Datei FilVar (An- 
zahl der Komponenten) aus. 
FILEPOS(FilVar) ermittelt 
die aktuelle Position des Da- 
teizeigers. Das Ergebnis ist 
eine Integerzahl. 

SEEK und FILESIZE die- 
nen unter anderem dem ele- 
ganten Erweitern einer Da- 
tei. Zunächst ermittelt 
FILESIZE die Dateigröße. 
Der so gewonnene Wert 
wird um eins erhöht, und 


zum Positionieren mit 
SEEK benutzt: 
SEEK(filvar,FILESIZE(fil- 
var)+1); 


Der Dateizeiger steht nun 
hinter dem letzten Element. 
WRITE(filvar,x) erweitert 
anschließend die Datei filvar 
um den Eintrag x. 

Mit dem Zeigersystem sind 
Random-Dateien, also Da- 
teien mit wahlweisem Zu- 
griff, kein Problem. Da 
Turbo-Pascal nicht zwi- 
schen Dateien zum Lesen 
und Dateien zum Schreiben 
unterscheidet, kann jeder 


beliebige Eintrag jederzeit 
gelesen und geschrieben 
werden. Ein zweidimensio- 
nales ARRAY dient als Ind- 
ex, der den Zeiger auf jeden 
Datensatz enthält. Die Su- 
che erfolgt über das AR- 
RAY und nicht über die Dis- 
ketten-Datei. Das spart 
wertvolle Rechenzeit. 

Pascal kennt weitere Anwei- 
sungen zur komfortablen 
Dateiprogrammierung: 
FLUSH(FilVar) leert den in- 
ternen Puffer und schreibt 
alle Daten auf Diskette. Da- 
durch wird sichergestellt, 
daß die Daten der letzten 
Schreiboperation auch tat- 
sächlich auf Diskette abge- 
legt werden und nicht im 
Puffer bleiben. Vor einem 
READ eingesetzt, erzwingt 
FLUSH, daß von Diskette 
und nicht aus dem Puffer 
gelesen wird. 
ERASE(FilVar) löscht die 
genannte Datei. 
RENAME(Filvar,String) 
benennt die Datei, die zuvor 
mit ASSIGN FilVar zuge- 
ordnet wurde, in die Zei- 
chenkette String um. Diese 
Anweisung führt zu Feh- 
lern, wenn die Datei filvar 
schon geöffnet ist oder der 
Name String bereits für eine 
andere Datei vergeben wur- 
de. 

EOF(Filvar) gibt den Bool- 
schen Wert TRUE aus, 
wenn der Dateizeiger am 
Ende der Datei steht. 

Für Datenbankanwendun- 
gen ist der Datentyp RE- 
CORD interessant. Er er- 
zeugt eine strukturierte Da- 
tei, die mehrere Datensätze 
mit mehreren Felder enthält. 


PROGRAM recfile; 
TYPE 
zeichen : STRING[2O]; 
recl = RECORD 
name : zeichen; 
vorname : zeichen; 
strasse : zeichen; 
ort : zeichen; 
end; 
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VAR 

adressen : file of recl; 

adr : recl; 
Diese Deklaration definiert 
eine „Karteikarte“ mit Fel- 
dern für Name, Vorname, 
Straße und Ort. Die Kartei- 
karte wird sowohl als Dis- 
kettendatei als auch als Spei- 
chervariable benutzt. Da- 
durch kann ein Datensatz 
mit READ(adressen,adr) di- 
rekt in den Speicher eingele- 
sen und auf dem umgekehr- 
ten Weg (WRITE(adres- 
sen,adr)) auch geschrieben 
werden. 


Übersicht durch 
Strukturierung 


Records wurden in der letz- 
ten Folge ausführlich be- 
schrieben. In Verbindung 
mit Dateien entstehen nur 
durch den verfügbaren Fest- 
speicherplatz begrenzte Da- 
tensammlungen. Durch den 
strukturierten Datentyp 
bleibt die Übersicht gewahrt 
— eine für komplexe Pro- 
gramme wichtige Vorausset- 
zung. 

Turbo-Pascal unterstützt 
neben diesem leistungsstar- 
ken Datentyp zusätzlich den 
Typ TEXT. Textdateien be- 
stehen aus Strings, die un- 
terschiedlich lang sein kön- 
nen. Mit diesem Dateityp 
werden Zugriffe auf Textda- 
teien besonders schnell erle- 
digt. Die Anweisungen 
READLN und WRITELN 
übernehmen die Aufgabe, 
Dateien zu lesen und zu 
schreiben. Jeder Zugriff 
geht über eine vollständige 
Zeile, die jeweils durch die 
Zeichenfolge CR/LF be- 
grenzt wird. 

Soll aber zeichenweise gele- 
sen und geschrieben werden, 
kommen die Anweisungen 
READ und WRITE zum 
Einsatz. Die Befehle EOLN, 
SEEKEOLN und SEEKE- 
OF dienen in diesem Fall der 
Positionskontrolle: 


EOLN(FilVar) gibt den 
Wert True aus, wenn das 
Ende einer Zeile erreicht 
wurde. Dieser Zustand wird 
an der CR/LF-Kombination 
erkannt. 
SEEKEOLN(filvar) arbeitet 
wie EOLN, überspringt aber 
eventuell vorhandene Tabu- 
latoren und Leerzeichen. 
SEEKEOF(filvar) arbeitet 
genauso wie SEEKEOLN, 
überspringt aber zusätzlich 
alle CR/LF-Kombinatio- 
nen, bevor es den Zustand 
End of File testet. 

Da die Länge einer Zeile 
nicht vorhergesagt werden 
kann, funktioniert beim Da- 
teityp TEXT nur der se- 
quentielle Zugriff; das Zei- 
gersystem der anderen Da- 
teitypen steht nicht zur Ver- 
fügung. 

Eine Spezialität in Turbo- 
Pascal sind nichttypisierte 
Dateien. Sie sind besonders 
schnell, aber auch etwas 
kniffelig zu programmieren. 
Sie lesen einen Datenblock 
von Diskette und übertragen 
ihn direkt in eine Variable. 


Schnelligkeit für 
Spezialisten 


Meist wird als Speicherva- 
riable ein ARRAY gewählt, 
das über seinen Index den 
Zugriff auf die einzelnen 
Elemente der Datei zuläßt. 
Diese Zugriffsvariante ist 
extrem schnell. Spezialisten, 
die keine Millisekunde ver- 
schenken mögen, legen die 
Variable direkt in den Bild- 
schirmspeicher ihres Rech- 
ners, der dann blitzartig mit 
Texten von der Diskette ge- 
füllt wird. 

Damit endet der Pascal-Ein- 
steiger Kurs. Wer noch wei- 
tere Informationen benö- 
tigt, sollte einen Blick auf 
Seite 16 werfen — dort 
gibt’s eine Buchvorstellung 
zum Thema PASCAL. 
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Gerüchteküche 


Wie ich gehört habe, gibt es 
die Möglichkeit, beim C16 
eine 80-Zeichen-Darstellung 
zu realisieren. Gibt es hierzu 
eine entsprechende Hard- 
ware? 

Gibt es eine Benutzerfläche 
ä la GEM oder GEOS für 
den C16? 


Horst Vondracek 


Es ist möglich, dem C16 
softwaremäßig eine 80- 
Zeichen-Bildschirmausgabe 
zu verpassen. Für den C64 
gibt es bereits mehrere Soft- 
warelösungen zu diesem 
Problem. Sie sehen meist so 
aus: Die Ausgabe der 
Zeichen erfolgt im HiRes- 
Grafikmodus des Rechners. 
Bei einer Auflösung von 
320x200 Bildpunkten ste- 
hen dabei für jedes Zeichen 
eine 4x 8-Pixel-Matrix zur 
Verfügung (bei 80 Zeichen 
und 25 Zeilen!). In einer 
4x 8-Matrix lassen sich je- 
doch kaum vernünftige 
Zeichen darstellen — die Er- 
gebnisse, die mit Software- 
Lösungen erreicht werden 
sind in der Regel unbrauch- 
bar. 

Beschränkt man sich auf 64 
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Zeichen pro Zeile, so ist die 
Zeichenmatrix 5x8 Pixel 
groß. Damit läßt sich schon 
eher eine augenfreundliche 
Darstellung erreichen 
vorausgesetzt, ein guter Mo- 
nochrom-Monitor ist vor- 
handen. Die Programmie- 
rung einer softwaremäßigen 
Lösung ist nicht einfach — 
Assembler und System- 
kenntnisse sind erforderlich. 
Eine Hardware-Lösung, wie 
die für den C64 erhältlichen 
80-Zeichen-Karten, gibt es 


für den C16 leider nicht, 


ebensowenig eine Benutzer- 
oberfläche wie GEOS (Vviel- 
leicht eine kleine Anregung 


für C16-Listing-Macher!). 


Hallo, ich habe einige Pro- 
bleme: 

1. Wie kann ich die Geräte- 
adresse der Floppy vom 
C128D hardwaremäßig auf 
9 oder 10 umstellen? 

2. Gibt es eine Möglichkeit, 
den C128D so zu manipulie- 
ren, daß er gleich nach dem 
Einschalten in den C64-Mo- 
dus springt, ohne daß die 


Gomputerspaß — mit Niveau 


Pirates of the 
Barbary Coast 


Unser zweites Spitzenspiel für 
Ihren C-64. Piraten haben Ihre 
Tochter entführt. Nur wenn Sie 
einen 
schwunghaften Seehandel ver- 
dienen und Ihre Kanonen feuer- 
bereit halten, können Sie Ihre 
Tochter wiederbekommen. Wer 
Taktik mit Action liebt, kommt an 


das Lösegeld durch 


diesem Spiel nicht vorbei! 
Diskette nur DM 39,95 


Defender of the 
Crown 


Dieses Spitzenspiel nun auch für 
den C-64. Eine Superstory und 
eine Grafik, die vom Feinsten ist, 
sorgen für einen unheimlichen 
Spaß. In harten Turnieren und 
nächtlichen Schwertkämpfen müs- 
sen Sie Ihre Fähigkeiten als Ritter 
beweisen. Viel Taktik und Finger- 
spitzengefühl wird bei den Erobe- 
rungskämpfen benötigt. Ein abso- 
lutes Spitzenspiel für Ihren C-64. 
Diskette nur DM 49,95 


Commodore-Taste gedrückt 
wird? 

3. Kann man den C128D 
und einen Amiga 500 an ei- 
nem Monitor A 1081 betrei- 
ben? 

P.S. Kein Kaufhaus in Frei- 
burg konnte mir weiterhel- 
fen !!! 

Armin Schweigert 

1. Es gibt zwei verschiedene 
Platinen für die Floppy im 
128D. Bei der einen gibt es 
die Brücken Jl und J2, bei 
der anderen zwei Schalter: 


Version mit Schaltern: 


links rechts Geräte- 
adresse 
oben oben 8 
unten oben 9 
oben unten 10 
unten unten 11 


Version mit Brücken: 


Brücke J1 Brücke J2  Geräte- 
adresse 
geschlossen geschlossen 8 
offen geschlossen 9 
geschlossen offen 10 


offen offen 11 


2. Mittels Modifikation der 
Betriebssysteme bzw. geeig- 


neter Hardware-Idee läßt 
sich das Problem lösen. Eine 
einfache Lösung ist bislang 
nicht bekannt. 

3. Der Anschluß geht pro- 
blemlos vorausgesetzt, 
man fertigt sich die richtigen 
Anschlußkabel an oder be- 
sorgt diese im Fachhandel. 


Wie kann ich Joe’s Super- 
scanner (Bauanleitung aus 
RUN 7/87) an einen Com- 
modore-Drucker MPS 803 
anpassen? Ist es möglich, 
dem Walzenvorschub dieses 
Druckers auf etwa 0,5 mm 
zu reduzieren, um so eine re- 
lativ gute Auflösung zu er- 
zielen? Ich wäre Ihnen 
dankbar für eine Lösung! 
Christian Wagner 


Die Resonanz auf die Bau- 
anleitung in RUN 7/87 war 
enorm. Zahlreiche Leser 
fragen nach, wie der Scan- 
ner an den einen oder ande- 
ren Drucker angeschlossen 
werden kann. Das RUN- 
Team hat leider nicht die 
Zeit, den Scanner an jedem 
Drucker 


Original Screen C-64 


Wir liefern die Ware frei Haus. Sie bezahlen keinerlei Zusatzkosten. Porto und Verpackungskosten sowie Nachnahmegebühren tragen wir. 
Fordern Sie noch heute unseren kostenlosen Katalog an. Oder schauen Sie in unseren Hard- und Softwareshop rein. 


R. Lindenschmidt 


Versandhandel 
Softwareshop 
4972 Löhne 2 
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Schulstr. 14 
Tel.: 0 57 32/7 28 49 
Postfach 13 28 


auszuprobieren $ 


und die Steuersoftware ent- 
sprechend anzupassen. 

Wem es gelungen ist, den 
Scanner an einen anderen 
Drucker anzupassen, der 
möge sich bitte beim zustän- 
digen Redakteur, Herrn 
Nickles (Tel. 089/3 60 86- 
252) melden. Für veröffent- 
lichte Tips und Tricks zum 
Scanner gibt es selbstver- 
ständlich Honorar! 


Soundwerte 
beim C16 


Ich möchte die musikali- 
schen Fähigkeiten meines 
C16 besser nutzen. Leider 
sind in der Tabelle im An- 
hang des Handbuches nur 
die Soundregister-Werte für 
die „weißen“ Tasten ange- 
führt. Meine Bitte lautet da- 
her: Wie berechnet man 
Halbtöne? 

Simon Schmitt 


Die Frequenz (Tonhöhe) 
eines Tons verdoppelt sich 


100 REM -----nunnnn anna nn nn 
110 REM BERECHNUNG DER PARAMETER 
120 REM DAS SOUNDREGISTER 
138 REM = nn nn 


140 SCNCLR:DIM N#t12) 

150 FORI=1TOI2:READ NSCI):NEXT 

160 K=111840.45:1=1.059463094 

170 DEF FNSCX)=INT(1024-(K/F)+.5) 

180 : 

190 SCNCLR:CHARI, 17,4, "MENUE:" 

200 CHAR1,9,6,"1-EINE NOTE BERECHNEN" 
210 CHAR1,9,7,"2-NOTENTABELLE DRUCKEN" 
220 CHAR1,12,8,"LEERTASTE BEENDET" 
230 GETKEYQs 

240 IF Qs=" "THEN SCHCLR:END 

250 IF Q4="I"THEN 290 

260 IF Qs="2"THEN 370 

270 GOTO19® 


280 ı 
290 CHAR1,18,12,"" 
300 INPUT" FREQUENZ (HZ) Som ;F 
310 IF F<11® OR F>0000 THEN 29@ 

" 32@ CHARI, 11,13, "” 
330 PRINT"SOUNDPARAMETER=" ;FNSCK) 
34@ CHAR1,11,15, "WEITER MIT LEERTASTE" 
350 GETKEYAI:GOTO190 
360 : 


370 SCNCLR:PRINT CHRS(LT); 

380 PRINT" GIITE DRUCKER EINSCHALTEN" 
390 PRINT" UND MIT LEERTASTE STARTEN" 
400 GETKEYKS:OPENA,A:F=110: FI=F 

410 PRINTA4, "NOTE u. AR." 
420 FO=110:FeFO:Fl=Fo 

430 FORM=1T04 

440 IF Mi THEN FO=2+Fö:F@Fo:ırl=F® 
450 FORN=1T012 

460 FRINTOA,NS(NI" "Fi;" m; 

470 IF F<989 THEN PRINTWA,” "; 

480 PRINTEA,FNSCK):F#FeisFI=INTIR+.S) 
490 NEXT:NEXT:CLOSE4:G0T0190 


’ 
S1® DATA "A ","AlSt,H 7," 
520 DATA "CIS","D ","DIS","E " 
530 DATA "F ","FIS","G ","GCI5" 
READY, 


Minilisting Soundwerte. 
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von Oktave zu Oktave. 
Nach europäischem Stan- 
dard hat der Kammerton A 
die Frequenz 440 Hertz. Das 
A der nächsthöheren Oktave 
hat demnach die Frequenz 
880 Hertz. Als Oktave be- 
zeichnet man das Intervall 
von zwölf aufeinanderfol- 
genden Halbtönen. Diffe- 
renzierter betrachtet, sind 
das sieben ganze Töne (die 
weißen Tasten des Klaviers) 
und fünf Halbtöne (die 
schwarzen Klaviertasten). 
Von Halbton zu Halbton 
ändert sich die Frequenz um 
die zwölfte Wurzel aus 
Zwei, die (auf neun Stellen 
gerundet) den Wert 
1.059463094 ergibt. Zusam- 
men mit der im Handbuch 
angegebenen Formel zur Be- 
rechnung der Soundregister- 
Werte, ermöglicht das die 
Berechnung der Halbtöne. 
Das überläßt man besser 
dem C16. Das abgedruckte 
Programm bietet zwei Mög- 
lichkeiten: 


NOTE FREQU. SOUNDPAR. 
A 119 7 
AIS 117 64 
H 123 118 
c 131 169 
cISs 139 217 
D 147 262 
DIS 156 305 
E 165 345 
F 175 383 
FIS 185 419 
G 196 453 
GIS 208 485 
A 220 516 
AIS 233 544 
H 247 571 
c 262 597 
cıs ZEIT 621 
D 294 643 
DIS 311 665 
E 330 685 
F 349 704 
FIS 378 722 
G 392 739 
GIS 415 755 
Probeausdruck der Tabelle. 


1. EINE NOTE BERECH- 
NEN 

Aus der eingegebenen Fre- 
quenz (in Hertz) wird der 
dazugehörige Parameter für 
das Soundregister berech- 
net. Diese Option ermög- 
licht auch die Berechnung 
beliebiger Zwischenwerte 
für exotische Tonleitern. 


2. NOTENTABELLE 
DRUCKEN 

Hier wird am Drucker eine 
Tabelle mit Notenname, 
Frequenz und Soundpara- 
meter ausgegeben. Der Ton- 
umfang der Tabelle dürfte 
in der Praxis ausreichen. 
Wenn nicht, so kann das 
leicht geändert werden. Auf 
Steuerzeichen zur Formatie- 
rung wurde verzichtet, so 
kann praktisch jeder beliebi- 
ge Drucker verwendet wer- 
den. 


Anmerkung zum Listing: 
Der Algorithmus für die Ta- 
belle mag vielleicht redun- 


A 440 770 
AIS 466 784 
H 494 798 
c 523 810 
cıSs 554 822 
D 587 834 
DIS 622 844 
E 659 854 
F 698 864 
FIS 740 873 
G 784 881 
GIS 831 889 
A 880 897 
AIS 932 904 
H 988 911 
c 1047 917 
CIS 1109 923 
D 1175 929 
DIS 1245 934 
E 1319 939 
F 1397 944 
FIS 1480 948 
G 1568 953 
GIS 1661 957 


dant erscheinen, hat aber ei- 
nen triftigen Grund. Wie 
man sieht, erfolgt die Be- 
rechnung in einer Iteration. 
Weil das Inkrement (I) nur 
mit neuen Stellen zur Verfü- 
gung steht, käme es gegen 
Ende der Iteration zu gro- 
ben Rundungsfehlern. Nach 
je zwölf Tönen wird daher 
die Start-Frequenz immer 
neu gesetzt, wodurch die 
Rundungsfehler in tolerier- 
baren Grenzen bleiben. 


Hallo! 

Ich bin ein großer Fan Eurer 
Zeitung und hoffe, ich kann 
Euch heute einen Tip geben. 
Kennt Ihr das Super-Adven- 
ture EROTIKA? Nachdem 
ich es mit Freunden gespielt 
habe, war ich restlos begei- 
stert. Tolle Bilder und eine 
super Story. Ich glaube, ein 
solches Adventure gibt es 
noch nicht, und sicher wird 
das auch andere Leser inter- 
essieren. Druckt doch bitte 
einen Test oder Bericht ab. 
Das wäre eine echte Be- 
reicherung! 

Ulrich Heller 


Testexemplar ist angefor- 
dert! 


Floppy Flop 1 


Seit einiger Zeit habe ich 
Probleme mit meinem Dis- 
kettenlaufwerk VC 1541. 
Nach dem Einschalten der 
Floppy erlischt nach einigen 
Sekunden die grüne und die 
rote Betriebsanzeige. Die 
Antriebsachse läuft ohne 
Unterbrechung und stoppt 
erst beim Auschalten der 
Floppy. Wenn ich zwischen 
Aus- und Einschalten einen 
Zeitraum von etwa ein bis 
zwei Minuten vergehen las- 
se, so ist die Floppy für kur- 
ze Zeit betriebsfähig. 


Ist dieser Fehler mit gerin- 
gem Aufwand selbst zu be- 
heben, oder ist es ratsam, 
das Gerät zum Reparatur- 
Service zu bringen? Was 
würde eine Reparatur even- 
tuell kosten? 

Christoph Klin 


Der Fehler liegt höchstwahr- 
scheinlich am 5-Volt-Netz- 
teil der Floppy. Meist ist der 
Gleichrichter für die 5-Volt 
kaputt. 

Stellt sich beim Messen her- 
aus, daß der Gleichrichter 
defekt ist, so kann man das 
Problem durchaus selbst lö- 
sen. Genaue Angaben be- 
züglich Reparaturkosten, 
können leider nicht gegeben 
werden, da diese von Fall zu 
Fall unterschiedlich sind. 


Floppy Flop 2 


Nach Einbau des Parallel- 
kabels (Bauanleitung in 
RUN 5/87), hat mein Sohn 
das Kabel aus dem Userport 
gezogen, wobei Rechner und 
Floppy eingeschaltet waren. 
Jetzt ist die Floppy hinüber: 
Bei Ladeanweisungen mel- 
det sie stets „? file not found 
error“. Mit einer anderen 
Floppy funktioniert der 
Rechner einwandfrei. 

Wie bringe ich die 1541 wie- 
der zu Laufen bzw. was ko- 
stet eine Reparatur? 

Heinz Cichon 


Der Fehler liegt entwender 
bei U-2 im C64 (Baustein 
6526) oder beim 6522-Bau- 
stein, von dem das Parallel- 
kabel ausgeht. Zunächst 
sollte man ausprobieren, ob 
die Floppy ohne Parallel- 
kabel noch läuft. Funktio- 
niert dies nicht, so kann es 
daran liegen, daß sich der 
Schreib-/Lese-Kopf außer- 
halb der formatierten Spu- 
ren befindet. Abhilfe er- 
reicht man durch Initialisie- 
ren der Floppy oder Forma- 
tieren einer leeren Diskette, 
um den Kopf wieder richtig 


zu stellen bzw. durch Aus- 
tauschen eines der obenge- 
nannten ICs. 


Floppy Flop 3 


Seit vier Monaten ist meine 
1541 lahmgelegt. Der 
Schließmechanismus, der 
zum größten Teil aus Kunst- 
stoff besteht, ist zerbrochen. 
Da der Andruck jetzt fehlt, 
ist mit dem Gerät nichts 
mehr anzufangen. Habe das 
defekte Kunststoffteil aus- 
gebaut und bin damit zu ei- 
nem Commodore-Vertrags- 
händler gegangen. Nach 
acht Wochen Wartezeit teil- 
te er mir jetzt mit, daß sich 
das kaputte Teil nicht auf 
der Ersatzteilliste befindet 
— eine neue Floppy könnte 
ich aber gleich mitnehmen. 
Bei Commodore Braun- 
schweig habe ich angerufen, 
aber da kennt sich keiner 
aus. Wie komme ich zu dem 
Teil? 

Ralf Elflein 


Das Ersatzteil ist bei Herrn 
Unterstaller von Rat und 
Tat in Eching — siehe Ka- 
sten — erhältlich. 


Floppy Flop 4 


Im Moment bin ich dabei, 
die Hardware meiner Com- 
puteranlage (C64 und Flop- 
py 1541C) umzurüsten. 
Beim C64 habe ich bereits 
eine Betriebssystem-Um- 
schaltplatine für bis zu fünf 
Betriebssysteme eingesetzt. 
Gleiches hatte ich auch mit 
der Floppy vor (Platine für 
bis zu vier DOS-Versionen). 
Weiterhin sollte ein Parallel- 
Kabel eingebaut werden. 
Hier tun sich jetzt allerdings 
zwei Probleme auf: 

1. Die neue 1541C hat eine 
neue Platine. Das DOS be- 
findet sich nicht mehr in 
zwei ICs, sondern in einem 
mit 28 Pins. Bei der alten 
Platine ist das DOS in zwei 
ICs auf die Bereiche $C000- 
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$DFFF und $E000-$FFFF 
aufgeteilt, so daß auf den 
Steckplatz UB4 problemlos 
ein Adaptersockel bzw. eine 
Umschaltplatine gesteckt 
werden konnte. Das Bren- 
nen der neuen DOS-Versio- 
nen für die alte 1541 war da- 
her kein Problem. Für die 
neue 1541C suche ich jetzt 
eine Lösung, mit der eine 
DOS-Umschaltung für bis 
zu vier DOS-Versionen rea- 
lisiert werden kann, da ja 
der Bereich $C000-$DFFF 
nicht mehr einzeln besteht. 
2. Der Einbau eines Parallel- 
Kabels ist bei der neuen 
1541C nicht möglich. Bei 
beiden VIA 6522 brachte 
das Kabel keinen Erfolg. Da 
es aber auch für die neue 
1541C Parallel-Speeder gibt, 
muß eine entsprechende Lö- 
sung existieren. Erwähnt 
werden muß in diesem Zu- 
sammenhang, daß die Steck- 
plätze für die beiden VIA 
6522 und der CPU 6592 auf 
der neuen Platine vertauscht 
sind. 


Weiterhin sind die ICs nicht 
mehr bei jeder 1541C gesok- 
kelt. Auf der Platine meines 
Laufwerks sind bis auf Con- 
troller und RAM alle ICs ge- 
sockelt. Bei der 1541C eines 
Bekannten sind bis auf die 
DOS-Bausteine alle ICs fest 
eingelötet. 


Ich hoffe auf Ihre Hilfestel- 
lung. 

Im Hinblick darauf, daß 
zwei meiner „Computer- 
Freunde“ und sicher auch 
andere Leser Ihrer Zeit- 
schrift vor den gleichen Pro- 
blemem stehen (werden), 
sollte in Zukunft die neue 
1541C in den entsprechen- 
den Artikeln immer berück- 
sichtigt werden, da man da- 
von ausgehen muß, daß das 


alte Laufwerk von Commo- 
dore nicht mehr gebaut 
wird. 


Gleiches gilt auch für den 
neuen C64 (ich habe im Hin- 
blick auf Hardwareverän- 


derungen glücklicherweise 
die alte Version). 

Zum Schluß möchte ich 
noch anregen, das Thema 
„Hardware“ in entsprechen- 
den Artikeln verstärkt her- 
vorzuheben, da wahrschein- 
lich viele Computer-Neulin- 
ge hierüber noch nicht um- 
fassend unterrichtet sind. 
Wünschenswert wären fol- 
gende Artikel: 

— Herstellung von neuen 
Betriebssystemen mit Flop- 
py-Speedern (natürlich mit 
Parallelübertragung). 

— Hardwarezusätze (zum 
Beispiel EPROM-Karten), 
— passende Software (Mo- 
dulgeneratoren), 

— Selbstbau von Hardware- 
ergänzungen (zum Beispiel 
Computergehäuse etc.). 
Solche Artikel sollten auch 
Computeranfänger anspre- 
chen. 

Lothar Metzmacher 


Von Ihren gewünschten 
Hardware-Artikeln sind in 
diesem Jahr bereits mehrere 
Artikel in RUN veröffent- 
licht worden. 

Zum Beispiel: 
Computertisch im Selbstbau 
(RUN 1/87) und Eprom- 
Modulgenerator (Listing in 
RUN 2/87). 
Hardwarezusätze wie zum 
Beispiel EPROM-Karten 
sind inzwischen so preiswert 
geworden (siehe Anzeigen- 
teil in RUN), daß sich 
Selbstbau kaum noch lohnt! 
Gerade bei Hardware-Arti- 
kel ist es nicht einfach jedem 
alles recht zu machen: Da 
sind zum einen die Profis, 
die hochkomplizierte Schalt- 
ungen fordern, und zum an- 
dern die Einsteiger, für die 
der Nachbau einer Kernal- 
Umschaltplatine bereits eine 
große Herausforderung dar- 
stellt. 

Ein ganz besonderes Pro- 
blem sprechen Sie mit den 
unterschiedlichen Platinen 
in Commodore-Geräten an. 
Was den neuen C64 anbe- 
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langt, so schafft der Artikel 
auf Seite 102 Abhilfe. Der 
neuen Floppy 1541C wird in 
Kürze „der Kopf gewa- 
schen“, 


Floppy Flop 5 


Nach dem Kauf einer Com- 
modore Floppy 1541C, ste- 
he ich vor einem großen 
Problem. Ich möchte den 
Floppy-Speeder Speeddos + 
von meiner alten 1541 in die 
neue 1541C einbauen. In der 
Neuen kann ich die beiden 
ICs 901229-05 und 6522 je- 
doch nicht finden! 

Guido Becker 


In UA-2 der 1541C-Platine 
sind die beiden ROMs UB3 
und UB4 der alten Floppy- 


Fa 


Platine in einem 16K-ROM 
zusammengefaßt. Dadurch 
läßt sich der Adapter für 
Floppy-Betriebssysteme wie 
SpeedDOS nicht mehr ein- 
bauen. Die meisten Floppy- 
Speeder-Hersteller bieten je- 
doch spezielle Versionen an, 
die sich auch in der 1541C 
problemlos einbauen lassen. 


Kein Floppy- 
Flop 


Seit einiger Zeit hängt sich 
mein C64 auf, wenn man 
von Grafik- auf Textseiten 
umschaltet bzw. umgekehrt. 
Nach einem Reset und dem 
Einladen eines Grafikpro- 
gramms kann man erken- 
nen, daß auf allen Grafiksei- 
ten wahllos Punkte gesetzt 


oder gelöscht werden (nur in 
geringem Maße, Grafiken 
sind also noch gut zu erken- 
nen). Läßt sich der Fehler 
durch Einbau eines neuen 
VIC beseitigen, oder kann 
durch einen defekten VIC 
noch mehr im Rechner ka- 
puttgehen? 

Joern Fasking 


Die Grafik-/Text-Umschal- 
tung wird im VIC vorge- 
nommen, aber hardwaremä- 
Sig werden zur Darstellung 
auf dem Monitor weit mehr 
Bauteile herangezogen. Da- 
mit kommen als Fehlerquel- 
le nicht nur der VIC, son- 
dern auch einige andere 
Bauelemente in Frage. Ohne 
die Fehlerquelle genau zu 
kennen, läßt sich nicht sa- 


gen, ob weitere Folgefehler 
im Rechner entstehen kön- 
nen. Es ist ratsam, zunächst 
einmal einen neuen VIC ein- 
zubauen — bringt dies kei- 
nen Erfolg, sollte der Rech- 
ner zur Reparatur geschickt 
werden. 


Crazy Cursor 


Mein C64 hat die unange- 
nehme Eigenschaft, unkon- 
trolliert die Farbe des Cur- 
sors zu verändern. Wenn ich 
zum Beispiel ein Directory 
lade, so ist alles, was auf die 
erste Bildschirmseite kommt, 
normal. In dem Moment, 
wo der Bildschirm scrollt, 
nimmt der Cursor alle mög- 
lichen Farben an — ein 
Wort ist dann mit mehreren 


Alles über ATARI-Computer, Software, Zubehör und... und...und... 
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Handel und Hersteller, Entwickler und Anwender treffen sich auf der ATARI Messe ’87. 
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Sehen, hören, fragen, diskutieren, ausprobieren, erleben, dabeisein. 
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Messe Düsseldorf, Messehalle 1, Messegelände 


Farben auf dem Bildschirm 
zu sehen. Wie kriege ich den 
Cursor wieder in den Griff? 
Jürgen Fraulob 


Beim C64 ist der Analog- 
schalter U-16 für die An- 
steuerung der vier Datenlei- 
tungen an den Color-RAM 
zuständig. Er ist sehr emp- 
findlich, was den Pegel des 
Dateneingangs von U-16 an- 
geht. Bereits ein leicht de- 
fekter Baustein, der eine der 
vier Datenleitungen belastet, 
kann eine Fehlsteuerung des 
U-16 bewirken. Bei der Re- 
paratur kommen _erfah- 
rungsgemäß einer der 6526 
(Ul und U2) in Frage. In sel- 
tenen Fällen kann auch U-8 
oder der Adreßmanager de- 
Sekt sein. 


5 JIrsennnIE 


Alles blau 


An meinem C64 ist folgen- 
des Problem aufgetreten: 
Trotz blauem Feld mit Rah- 
men fehlt beim Einschalten 
meines C64 die Einschalt- 
meldung — der Bildschirm 
bleibt leer. Es blitzen jedoch 
kurzzeitig einige'Zahlen und 
Buchstaben auf. Was ist ka- 
putt? 

Gerhard Mann 


Dieser Fehler tritt meist 
dann auf, wenn im C64 U-3 
(BASIC-ROM) defekt ist. 
Wurde im Rechner eine Be- 
triebssystem-Umschaltplati- 
ne eingebaut, so sollten an 
dieser alle Leitungen über- 
prüft werden. Viele Um- 
schaltplatinen, die in den 
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C64-Kernal-Sockel gesteckt 
werden, haben einen großen 
Nachteil: Ihre PINs sind zu 
dick — der Kernal-Sockel 
auf der C64-Platine leiert 
aus und hält ein Original- 
Kernal-IC nicht mehr rich- 
tig. In diesem Fall ist ein 
neuer Sockel einzubauen. 


Ich habe ein „kleines“ Pro- 
blem. Meine Freundin hat 
mir zum Geburtstag das 
Computerspiel „The last 
V8“ geschenkt — leider für 
den C128 und umtauschen 
wollte das Geschäft nicht. 
Ich besitze einen C64 und 
suche jetzt eine Möglichkeit, 


das Spiel auf diesem zum 
Laufen zu bringen. Gibt es 
eine Lösung? 

Werner Zölper 


Die C128-Version des Spiels 
„The last V8“ ist eines der 
wenigen Spiele, die speziell 
für den C128 geschrieben 
wurden. Auf dem C64 ist es 
nicht lauffähig. 


Telexanschluß 
an C64 


Ist es möglich, den C64 als 
Eingabegerät an ein Telex- 
Gerät anzuschließen? Wem 
ist es gelungen, bzw. welcher 
Leser weiß Rat? 


Harald T. Hölzer 
Neufriedenheimer Str.65 
8000 München 70 


_ PROM-Karten 
© für den C64 gibt 
zer es in Hülle und 
0 Fülle, die hier vor- 

gestellte zeichnet sich jedoch 

durch besondere Features 
aus. Im Gegensatz zu her- 
kömmlichen EPROM-Um- 
schaltplatinen wird bei 
„Brainy“ nicht mit einem 


Umschalter, sondern per 
Software über ein komforta- 
bles Menü, umgeschaltet. 
Überhaupt besticht das 


„Brainy“-System durch sei- 
ne einfache Bedienung. 

Die Funktionsweise des 
EPROM-Banksystems läßt 
sich am besten mit einem 
Diskettenlaufwerk verglei- 
chen, von dem nur geladen 
wird. Programme werden 
statt von Floppy aus einem 
EPROM geladen. Das geht 
natürlich wesentlich schnel- 
ler als bei der schnellsten 
Floppy-Station. So stehen 
häufig benötigte Program- 
me auf Knopfdruck sofort 
zur Verfügung. Interessant 
ist „Brainy“ vor allem für 
Anwender, die größtenteils 
mit einigen bestimmten Pro- 
grammen arbeiten. Pro- 
grammierer werden ihr 
„Brainy“ mit den wichtig- 
sten Tools wie Assembler, 
Monitor und so weiter verse- 
hen. Gewerblich eingesetzte 
C64 erfahren durch das 
EPROM-System eine enor- 
me Leistungssteigerung, da 
jetzt schnell zwischen unter- 
schiedlichen Programmen, 
wie Fakturierung oder Lie- 
ferschein-Programm ge- 
wechselt werden kann. 

„Brainy“ besteht aus den 


= 
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IEOT: Zub KBYTE-EPROM- 
DDUL FÜR C64 


„Brainy“ heißt ein neues Eprom-Banksystem für 
den 664 von Message-Gomputer. Es kann beliebig 
viele Programme mit insgesamt bis zu 256 KByte 

Umfang auf Eproms verwalten. 


Funktionsgruppen Hard- 
ware, Auswahlmenü und 
Modulgenerator. Die Hard- 
ware, mit den Stecksockeln 
für die nicht zum Lieferum- 
fang gehörenden EPROMs, 
ist in einem Standardgehäu- 
se für den Expansion-Port 
untergebracht. Der Aufbau 
der Platine ist sauber und 
zeugt von gewissenhafter 
Fertigung. Die EPROMs 
enthalten später neben den 
Programmen auch das Aus- 
wahlmenü. Auf der Rück- 
seite des Moduls befindet 
sich ein Taster, mit dem 
„Brainy“ aktiviert wird. Er 
meldet sich mit einem 
Menü, in dem das ge- 
wünschte Programm na- 
mentlich aus den EPROMs 
ausgewählt werden kann. 
Dieses wird dann, wie von 
Diskette, in den Speicher des 
C64 geladen und auf 
Wunsch automatisch gestar- 
tet. Soll kein Programm von 
EPROM geladen werden, 
kann man „Brainy“ durch 
Betätigung der Run/Stop- 
Taste verlassen. Der C64 
meldet sich dann mit seinem 
gewohnten Einschaltbild 
und steht für andere Aufga- 
ben zur Verfügung. Dabei 
kann das Modul im Port 
verbleiben, es stört kein 
Programm bei der Ausfüh- 
rung. 

Die Basis-Adresse des Mo- 
duls kann in weiten Grenzen 
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eingestellt werden. Dadurch 
kann „Brainy“ eine von an- 
deren Modulen nicht belegte 
Position im Expansion-Be- 
reich einnehmen, was die 
Kompatibilität zu anderen 
Hardware-Erweiterungen 

enorm steigert. Bevor Pro- 
gramme von „Brainy“ ver- 
waltet werden können, müs- 
sen die EPROMs gebrannt 
werden. Dabei hilft der Mo- 
dul-Generator. Dieser arbei- 
tete mit den Laufwerken 
1541, 1570/71 und kompati- 
blen. Ähnlich wie bei einem 
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Brainy-Platine 


Kopierprogramm werden 
die Programme angegeben, 
die später auf den EPROMs 
stehen sollen. Der Modulge- 
nerator ist mit komfortablen 
Menüs ausgestattet, die in 


punkto Bedienungsfreund- 
lichkeit nichts zu wünschen 
übrig lassen. Die Program- 
me, die nachher auf den 
EPROMs stehen sollen, 
können sortiert und umbe- 
nannt werden. Ebenfalls las- 
sen sich die Anfangsadres- 
sen der Programme ändern. 
Das ist bei Verwendung von 
compilierten Programmen 
wichtig. Ungünstig ist ledig- 
lich die Belegung der ’Resto- 
re’-Taste gewählt, mit der 
das Programm beendet 
wird. Durch ihre Nähe zur 
’Return’-Taste kann es 
leicht passieren, daß beide 
Tasten gleichzeitig gedrückt 
werden und sich das Pro- 
gramm unbeabsichtigt ver- 
abschiedet. 

Die Anzahl der Programme 
im Modul unterliegt keiner 
Beschränkung. Es können 
alle Programmtypen, wie 
Basic-, oder Assemblerpro- 
gramme verwendet werden. 
Die ausgewählten Program- 
me werden vom Modulgene- 
rator als EPROM-Files auf 
Diskette kopiert. Mit diesen 
EPROM-Files, die auch das 
Auswahl-Menü enthalten, 
werden dann die EPROMs 
eingebrannt. EPROMs der 
Typen 2764-27 512 können 
beliebig untereinander ge- 
mischt werden. Dadurch er- 
gibt sich eine Speicherkapa- 
zität von 32 bis 256 KByte. 
Bei der Auswahl der Pro- 
gramme ist zu beachten, 
daß nur einteilige Program- 


me verwendet werden 
können. Mehrteilige Pro- 
gramme müssen vorher 


Fortsetzung auf Seite 101 


N EREIE  ER  A 


uf dem Mu- 
siksektor 

etablierte 

sich seit 
1983 ein neuer Standard, der 
musikalisches Arbeiten mit 
dem kostengünstigen Ein- 
satz von Home- und Perso- 
nalcomputern ermöglicht. 
Lange Zeit verbanden Musi- 
ker das Wort Computer mit 
so phantastischen Musik- 
computer-Systemen wie 
Fairlight oder Synclavier. 
Mit weit über 100 000 Mark 
bleiben sie jedoch uner- 
schwinglich. Erst der Preis- 
verfall der Heimcomputer 
machte den Einsatz von 
Computern in der Musik in- 
teressant. Das verbindende 
Element wurde mit MIDI 
geschaffen. Wie kam es 
schließlich zum Entwurf die- 
ses „Meilensteins“ der mo- 
dernen Musikgeschichte? 


MIDI contra 
Inkompatibilität 


Innerhalb zweier Jahrzehnte 
entwickelte sich der Synthe- 
sizer aus einem monopho- 
nen (einstimmigen), span- 
nungsgesteuerten Instru- 
ment zu einem völlig von 
Mikroprozessoren be- 
herrschten System. 

Schon bei den ersten, relativ 
einfach aufgebauten Gerä- 
ten war es sehr schwierig, 
unterschiedliche Instrumen- 
te miteinander zu koppeln. 
Als Lösung boten sich nur 
kostspielige Interfaces zur 
Anpassung der Steuer- be- 
ziehungsweise Triggerspan- 
nungen (zum _ Beispiel: 
1 Volt pro Oktave) an. 


Da bei polyphonen (mehr- 
stimmigen) Synthesizern 
eine einzelne Steuerspan- 
nung nicht mehr ausreicht, 
wurden bald Mikroprozes- 
soren zur Tastaturabfrage 
benutzt. Verschiedene Pro- 
zessortypen und diverse Da- 
tenformate machten es un- 
möglich, Synthesizer unter- 


missen 
MUSIK-MIK MI 


schiedlicher Hersteller zu 
verbinden: Kompatibilitäts- 
probleme gibt es also nicht 
nur bei Heimcomputern! 

In einer Konferenz der füh- 
renden Hersteller von Musik- 
elektronik im Januar 1982 
wurden die Spezifikationen 
des Musical-Instrument-Di- 
gital-Interface, kurz MIDI, 
festgelegt. Noch im Laufe 
des Jahres 1982 erschienen 
die ersten MIDI-fähigen 
Synthesizer. Besonders die 
Firmen Roland, Korg und 
Yamaha leisteten Pionierar- 
beit und trieben die Weiter- 
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MIDI 


Computer verändern die Arbeitsweise von 
Komponisten und Musikern. 
Dies ist vor allem einer Schnittstellen- 


Norm zu verdanken: MIDI. 


entwicklungen der Norm 
voran. Heutzutage gibt es 
kaum noch elektronische 
Musikgeräte, die nicht mit 
der MIDI-Schnittstelle aus- 
gerüstet sind. Das be- 
schränkt sich nicht nur auf 
Synthesizer. Effektgeräte, 
Rhythmusmaschinen, Heim- 
orgeln, Konzertflügel, 
Mischpulte und sogar gute 
„alte“ Röhren-Gitarrenver- 
stärker sind neuerdings mit 
den MIDI-Anschlüssen ver- 
sehen. 


So kann man zum Beispiel 
von einem zentralen Key- 
board aus beliebig vieleandere 
Instrumente ansteuern. Der 
Trend geht dahin, daß sich 
der Keyboarder nur noch ein 
Masterkeyboard mit einer 
qualitativ hochwertigen Ta- 
statur zulegt, das via MIDI 
alle angeschlossenen Synthe- 
sizer — in der Form von ta- 
staturlosen Moduleinschü- 
ben zum Erklingen 
bringt. DieeigentlicheKlang- 
erzeugung erfolgt in den 
Soundmodulen, die ohne die 
steuernde Tastatur des Ma- 
sterkeyboards funktionsun- 
fähig sind. Übertragen wer- 
den dabei nicht nur die Da- 
ten, wann und wie lange eine 
Taste angeschlagen wird, 
sondern zugleich auch An- 
schlagdynamik sowie die 
Stellung der Modulationsrä- 
der und Klangparameterda- 
sen. An den Geräten selbst 
st das eingebaute MIDI-In- 
serface lediglich an zwei 
oder drei fünfpoligen DIN- 
Buchsen zu erkennen. Bevor 
wir die verschiedenen Reali- 
sierungen betrachten, sei 
noch vermerkt, daß MIDI 
zuch unter Nichtmusikern 
zunehmend an Bedeutung 
gewinnt: Als schnelle serielle 
Schnittstelle ermöglicht 
MIDI den Datenaustausch 
zwischen beliebigen Compu- 
tersystemen. 

Das MIDI-Interface ist 
asynchron seriell ausgelegt, 
@amit der Verkabelungsauf- 


wand zwischen den Instru- 
menten möglichst gering 
bleibt. Es arbeitet mit einer 
Übertragungsrate von 31,25 
kBaud. Damit befindet sich 
das MIDI-Interface im Ver- 
gleich zur RS232-Schnitt- 
stelle mit 19,2 kBaud im 
Hochgeschwindigkeitsbe- 
reich. Dadurch werden die 
durch das serielle Konzept 
bedingten Verzögerungen 
beim Datenaustausch auf 
ein Minimum beschränkt. 
Als Steckverbindungen die- 
nen fünfpolige DIN-Buch- 
sen (180 Grad), die über 
handelsübliche Audio-Über- 
spielkabel verschaltet wer- 
den. Zwingend erforderlich 
sind die Buchsen MIDI-IN 
und MIDI-OUT. An MIDI- 
OUT kommen die Daten 
heraus und steuern ein wei- 
teres Gerät mit MIDI-IN 
Eingang. MIDI-IN ist folg- 
lich der Dateneingang des 
gesteuerten Gerätes. Der 
dritte Anschluß MIDI- 
THRU (Durchgang) liefert 
eine direkte Kopie der Da- 
ten, die bei MIDI-IN herein- 
kommen. Manche Hersteller 
verzichten aus Kostengrün- 
den auf die MIDI-THRU 
Buchse. Ist dieser Anschluß 
vorhanden, so können meh- 
rere Geräte in Serie geschal- 
tet werden. Je nach der Ver- 
kabelung kann also ein 
MIDI-Instrument als MIDI- 
Sender oder -Empfänger ar- 
beiten. Siehe hierzu Abbil- 
dung 1. 


Eine besondere technische 
Raffinesse ist die galvani- 
sche (potentialfreie) Tren- 
nung von Sender und Emp- 
fänger. Die Informations- 
übertragung via MIDI er- 
folgt durch eine 5 mA 
Stromschleife, die auf der 
Empfängerseite durch einen 
Optokoppler vom gesteuer- 
ten Gerät getrennt ist. Der 
Optokoppler ist im Prinzip 
eine Kombination aus Licht- 
quelle (LED) und Lichtemp- 
fänger (Fototransistor). 


u ERHÄTERNEETER WERE EN 


WISSEN 


Durch den vom MIDI-Sen- 
der eingeprägten Strom er- 
zeugt die LED ein Licht- 
signal. Das von der Licht- 
quelle abgegebene Signal 
wird vom Lichtempfänger 
wieder in elektrische Impul- 
se zurückverwandelt. Durch 
die Potentialtrennung der 
Gerätemassen im Opto- 
koppler werden akustische 
Brummstörungen (50 Hertz 
Netzbrummen), wie sie beim 
Zusammenschalten mehre- 
rer Musikgeräte häufig auf- 
treten, von vornherein aus- 
geschlossen. 


Nachrüstung 
beim 
Heimcomputer 


Da die meisten Heimcompu- 
ter die MIDI-Norm-Schnitt- 
stelle nicht serienmäßig bie- 
ten, muß sie nachgerüstet 
werden. Dazu dienen bei 
C64 und Amiga MIDI-Inter- 
face-Steckkarten, die im 
Handel ab zirka 150 Mark 
angeboten werden (Bezugs- 
quellen siehe unten). Das 
Herz dieses Interfaces ist der 
6850 ACIA (Asynchronous 
Communications Interface 
Adapter), der die parallelen 
Datenbytes in serielle wan- 
delt und jedem seriellen Byte 
ein Start-Bit und ein Stop- 
Bit hinzufügt. Bei maxima- 
ler Übertragungsrate wird 
etwa alle 300 us ein MIDI- 
Wort gesendet: 


Start- Bit Bit Bit Bit 
Bil, 27 6 5 4 


Die weiteren Baueinheiten 
der Interface-Steckkarte 
sind (siehe auch Abbildung 
2): Die Takterzeugung mit 
Schwingquartz und Fre- 
quenzteiler-IC und der Op- 
tokoppler (mit Schutzdiode) 
zur galvanischen Trennung. 
Die MIDI-Worte transpor- 
tieren also Informationen 
innerhalb des MIDI-Ver- 


bundes. Die Transportwege 
sind dabei die MIDI-Kanäle, 
von denen 16 vorgesehen 
sind. Diese Kanäle (die übri- 
gens nur softwaremäßig vor- 
handen sind) kann man sich 
als Röhren vorstellen, durch 
die die Informationen zu 
den richtigen Zielen geleitet 
werden. Je nach den Eigen- 
schaften eines MIDI-Geräts 
kann dieses einen, mehrere 
oder alle Kanäle „anzap- 
fen“. Das Kanalsystem er- 
laubt die Steuerung von bis 
zu 16 unabhängigen Emp- 
fängern über nur eine Ver- 
bindungsleitung (siehe Ab- 
bildung 1, Kettenschaltung). 
Um die Informationen in 
den Kanälen richtig zu leiten 
und zu erfassen, besitzt das 
MIDI-System drei Betriebs- 
arten: OMNI, POLY und 
MONO. Diese Modi dürfen 
nicht mit den Begriffen 
„monophon“ (einstimmig) 
und polyphon (mehrstim- 
mig) verwechselt werden. 

Im OMNI-Mode reagiert ein 
MIDI-Empfänger auf die 
ankommenden Daten aller 
16 Kanäle. Arbeiten in ei- 
nem Netz alle Instrumente 
im OMNI-Mode, so spielen 
sie alle die gleichen Töne, 
die der Sender via MIDI de- 
finiert. Im POLY-Mode ver- 
wertet ein Instrument nur 
die Daten, die auf dem ihm 
zugeteilten Kanal ankom- 
men. MIDI-Worte auf ande- 
ren Kanälen werden igno- 


Bit Bit Bit Bit Stop- 
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riert, aber dennoch über die 
eventuell vorhandene MIDI- 
THRU-Buchse weitergelei- 
tet. So kann ein einziger 
Sender ein ganzes Orchester 
von Synthesizern und 
Rhythmuseinheiten dirigie- 
ren, von denen jeder Emp- 
fänger sich seinen eigenen 
Part aus dem Datengewirr 
aussucht und verarbeitet. 
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Im MONO-Mode bieten 
sich ähnliche Möglichkeiten 
wie im POLY-Mode. Vom 
Sender her gesehen gleichen 


sich beide Betriebsarten. 
Kann ein Synthesizer aber 
gleichzeitig verschiedene 


Klangfarben (zum Beispiel 
Baß, Harmonie- und Melo- 
dieinstrument) erzeugen, so 
kann jeder dieser Klangfar- 
ben ein (hier monophoner) 
Kanal zugeordnet werden. 
In jüngster Zeit hat sich eine 
weitere Betriebsart etabliert, 
der MULTI-Mode Er 
gleicht dem MONO-Mode, 
nur sind die obengenannten 
Klangfarben jetzt auch 
mehrstimmig spielbar. 


Um neben den reinen Tasten- 
informationen einen univer- 


sellen Datenaustausch 
(Klangparameter, Synchro- 
nisierung ...) zu ermögli- 


chen, wurde folgende Da- 
tenstruktur vereinbart: 

Alle Daten werden in Byte- 
Form plus Start- und Stop- 
Bit gesendet (siehe oben). 
Dabei gibt das siebte Bit 
(Most Significant Bit, MSB) 
an, ob ein Status-Wort (legt 
den MIDI-Kanal fest und 
beschreibt die Art der nach- 
folgenden Daten) 

ED Er 2 Er A < x 
oder ein reines Date-Wort 
BRERSLER. KR X 
gesendet wird. Im ersten 
Fall ist das siebte Bit „I“, im 
zweiten Fall ist es „O“. 


Die Daten, die durch die 
MIDI-Worte übertragen 
werden, sind in folgende Ka- 
tegorien eingeteilt: 

1. Kanaldaten 

2. Allgemeine Systemdaten 
3. Echtzeitdaten 

4. Exklusivdaten 

5. Rückstelldaten 


In jeder Datenart existieren 
Status-Bytes und — falls nö- 
tig — entsprechende Daten- 
Bytes. 


R missen 


Die Kanaldaten übermitteln 
Anzahl, Tonhöhe und An- 
schlaggeschwindigkeit der 
gedrückten Tasten sowie 
Modulationsmöglichkeiten 
des Musikinstruments. 

Die allgemeinen Systemda- 
ten (System Common 
Events) gelten für alle Kanä- 
le gleichermaßen. Sie geben 
die augenblickliche Takt- 
und Songnummer an und 
stimmen auf einen TUNE- 
Befehl hin die angeschlosse- 
nen Synthesizer auf einheit- 
liche Tonhöhe. 

Die Echtzeitdaten (System 
Real Time) werden zur Syn- 
chronisierung mehrerer 
MIDI-Geräte, wie Sequen- 
zer und Rhythmuseinheiten, 
verwendet. 

Exklusivdaten sind herstel- 
ler- und produktspezifische 
Informationen, beispiels- 
weise Klangparameter von 
Synthesizern. Eine Sonder- 
form von Exklusivdaten 
sind die Klangdaten (Abtast- 


Buchsen: 


MIDI-IN 


MIDI-OUT 


MIDI-THRU 


Einen MIDI-Synthesizer .... 


wıllo) 


. . „ erkennt man an diesen Buchsen. 


Optokoppler ACIA-Baustein 
mit 
Schutzdiode 


Steckleiste 


Takterzeugung 
31,25 kH 


Der prinzipielle Aufbau eines MIDI-Interfaces. 
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werte) von „Soundsamp- 
lern“, die Naturklänge digi- 
talisiert speichern und re- 
produzieren. Die Datenfülle 
eines gesampelten Klanges 
läßt sich in Parameterform 
nur sehr umständlich und 
zeitaufwendig handhaben. 
Deshalb einigte man sich 
von seiten der Herstellerfir- 
men auf den MIDI Sample 
von Dump-Standard, eine 
Ergänzung der alten MIDI- 
Norm 1.0. 

Mit Hilfe von Rückstellbe- 
fehlen wird das ganze MIDI- 
System in einen definierten 
Ausgangszustand zurück- 
versetzt. 

Einzelheiten zu den wichtig- 
sten Befehlen der MIDI- 


out 


hedkındhndhandhadhe 


Sender 


Empfänger 1 


a) Kettenschaltung 


missen 


Norm 1.0 sind in Tabelle 1 

zusammengefaßt. 

Neben der obengenannten 

Vernetzung von Heimcom- 

putern bieten sich für den 

Musiker interessante Ein- 

satzmöglichkeiten: 

© Synthesizer werden in 
beliebiger Zahl zusam- 
mengeschaltet und si- 
multan gespielt. So ist 
eine unbegrenzte Klang- 
fülle erreichbar. 

@ Der Computer wird mit 
MIDI-Sequenzer-Soft- 
ware zum intelligenten 
Multi-Track-Tonband. 

© Notenausdruck eigener 
Kompositionen, Arran- 
gements, Improvisatio- 
nen. 


In thru in 


Drums 


andınndindinndindıd 


Empfänger 2 Empfänger 3 


Sender 


c) MERGE-Schaltung 


Empfänger 3 


Andranshodtanshadıd 


Empfänger 1 


© Archivierung von Klang- 
daten, Sequenzen, Songs 
auf Diskette. 

®© Musikerziehung wie No- 
tenlernen, Intervalltrai- 
ning, Improvisations- 
übungen. 

e Live-Spielhilfen für Ar- 
peggios, Harmonisie- 
rung. 

e Grafisches Erstellen von 
Synthesizerklängen 
durch Editierprogramme 
für Klangparameter. 


MIDI-Sequenzer 
mit fantastischen 
Möglichkeiten 


Unter den vielen Einsatzge- 
bieten von Computern in 
der Musik sind die Möglich- 
keiten eines MIDI-Sequen- 
zer-Programms am faszinie- 
rendsten. Um sich die Funk- 
tion zu verdeutlichen, denkt 
man am besten an ein pro- 
fessionelles Mehrspurton- 
bandgerät. Dieses ermög- 
licht, nacheinander mehrere 
Tonspuren aufzunehmen 
und gemeinsam wiederzuge- 
ben. Die gesamte Popmusik- 
Branche bedient sich dieser 
Maschinen. In den moder- 
nen Tonstudios wird heutzu- 
tage nicht mehr mit mehre- 
ren Musikern gleichzeitig 
live musiziert, sondern jedes 
Instrument nacheinander 
und getrennt aufgenommen. 
Erst bei der endgültigen Ab- 
mischung werden die einzel- 
nen Spuren ins richtige 
Lautstärkenverhältnis ge- 
bracht und mit verschiede- 
nen Effektgeräten „aufpo- 
liert“. Das einmal aufge- 
nommene Tonmaterial kann 
prinzipiell nur durch Neu- 
aufnahme von Teilpassagen 
editiert werden, da sich die 
breiten Tonbänder schlecht 
manuell schneiden lassen. 
Gerade das vielfältige und 
einfache nachträgliche Edi- 
tieren zeichnet jedoch die 
MIDI-Sequenzer-Program- 


Reihenfolge einzelner Teil- 
aufnahmen geändert. Jedes 
einzelne MIDI-Event (meist 
1 Statusbyte mit 2 Daten- 
bytes: Tonhöhe mit Anschlag- 
dynamik, Klangprogramm- 
wechsel etc.) kann komfor- 
tabel gelistet und bei gleich- 
zeitiger grafischer Darstel- 
lung bequem editiert wer- 
den. Es ist bei manchen Pro- 
grammen sogar möglich, 
das Aufgenommene rück- 
wärts wiederzugeben, wobei 
alle anderen, nicht ange- 
wählten Instrumentalspuren 
unverändert bleiben — Ma- 
nipulationen, die mit einem 
herkömmlichen Tonbandge- 
rät nicht möglich sind. 
Trotzdem ist die generelle 
Funktionsweise sehr ähn- 
lich: Einige Programme si- 
mulieren Start-, Stop-, Re- 
cord-, Vor- und Rücklaufta- 
sten sowie ein Bandzähl- 
werk. 

Die einzelnen Tracks werden 
nacheinander aufgenommen 
und beliebig manipuliert. 
Kopieren, Transponieren, 
Verlängern, Verkürzen, ver- 
ändertes Tempo, Ausbes- 
sern von Spielfehlern und 
anschließender Notenaus- 
druck sind kein Problem. 


Man muß sich aber stets 
darüber klar sein, wie ein 
MIDI-Sequenzer arbeitet: 
Der Computer merkt sich 
ausschließlich die ihm mit- 
tels MIDI-Keyboard einge- 
spielten MIDI-Events 
also Daten über Zeit, Dauer 
und Tonhöhe des Tastenan- 
schlags, Programmwechsel 
und so weiter. Der eigentli- 
che Klang wird nicht gespei- 
chert. Diesen erzeugt das 
beim Abspielen angeschlos- 
sene MIDI-Equipment. Ge- 
sang oder Gitarre kann man 
also nicht im MIDI-Sequen- 
zer speichern. 


Bedingt durch den allgemei- 
nen Preisverfall der Perso- 
nalcomputer Amiga und 
Atari ST finden sich ver- 


$o lassen sich MIDI-Geräte verschalten. mehrt günstige Angebote $ 
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me aus. Blitzschnell wird die 


BEN ER N 


@ missen 


f KANAL-DATEN N 


Datenbyte 1 Datenbyte 2 Beschreibung des Befehls 


Statusbyte 

1001 nnnn Okkk kkkk 0000 0000 
1001 nnnn Okkk kkkk Ovvv vor 
1011 nnnn 0000 0001 Ovvv vrvv 
1011 nnnn 0000 0101 Ovvv ver 
1011 nnnn 0100 0000 OXXX XXX 
1011 nnnn 0100 0000 0000 0000 
1011 nann 0100 0001 OxXXX xxx 
1011 nnnn 0100 0001 0000 0000 
1100 nnnn OppP PPpPp > 
1101 nnnn Ovvv ve » 
‚A110 nnnn 0000 0000 Ovvv vo. 


FREE: Datenbyte 1 Datenbyte 2 
1111 0000 0444 i4ii 2 

4 odad dddd m 
2111 0111 e = 


ı111 1000 - = 


1111 1001 “ - 
1111 1010 = - 
1111 1011 = - 
1111 1100 = - 


Statusbyte 

1111 0010 Ohhh hhhh o121 1111 
1111 0011 Osss ssss = 
1111 0110 . 7 


4211 1111 — - 


NOTE OFF 
annn = 0 - 15 (MIDI-Kanal) 
kkkkkkk = 0 - 127 (Tonhöhe) 


NOTE ON 

kkkkkkk = 0 - 127 (Tonhöhe) 

vevvvvv = 1 - 127 (Anschlag- 
dynanik) 


CONTROL CHANGE: MODULATION 
vvvvvvv = 0 - 127 (Modulations- 
tiefe) 


CONTROL : PORTAMENTO TIME 
veyvuwvvv = 0 - 127 


CONTROL CHANGE: 

RR = 1 - jr 7 Duay) 

CONTROL CHANGE: 

CONTROL CHANGE: PORTAMENTO ON 

KARERXX 

CONTROL CHANGE: POR’ 

PROGRAM CHANGE 

PPPPPppp = 0 - 127 (Klangprogramm- 
nummer) 


AFTER TOUCH (Tastenhaltedruck) 
ve .= 0 - 127 


PITCH BENDER (Tonhöhenrad) 
vevvvvv = 0 - 127 (Tonhöhe) 


EXCLUSIVE STATUS 
iiiiiii = 0 - 127 (Hersteller- 
identifikation) 


DATA BYTES 
aaddddd = 0 - 127 


END OF EXCLUSIVE DATA 


TIMING-CLOCK-IN-PLAY (Synchronim- 
pulse; 24 clocks pro Viertelnote) 


STOP-Befehl für Sequenzer 
START-Befehl für Sequenzer 
CONTINUE-Befehl 
TIMING-CLOCK-IN-STOP (Synchronim- 


pulse solange Sequenzer nicht 
spielt) 


MEASURE INFORMATION 

hhhhhhhlllllll: Taktnummer als 
164-bit Wert 

SONG SELECT 

sssssss = 0 - 127 (Songnunmer) 


TUNE-Befehl 


allgemeiner SYSTEM RESET 


Tabelle 1: Die wichtigsten MIDI-Befehle. 


von C64-Systemen unter den 
Kleinanzeigen (vergleiche 
RUNBOARD). Bisweilen 
sogar mit kompletten Mu- 
siksoftware-Paketen. Man 
sollte die Qualität derartiger 
MIDI-Sequenzer nicht un- 


terschätzen, auch wenn lei- 
stungsfähigere Produkte für 
größere Computer auf dem 
Markt sind. Gerade für 
MIDI-Einsteiger bietet sich 
die einmalige Chance, zu ei- 
nem Preis von weit unter 
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1000.— Mark ein MIDI- 
Computer-System zu erwer- 
ben, das noch vor einem 
Jahr das Nonplusultra dar- 
stellte. Besonders empfeh- 
lenswert sind die Program- 
me „pro-16“ von Steinberg 
Research und „Supertrack“ 
beziehungsweise „SCOre- 
track“ von C-Lab. Wer aber 
gern komfortabel und mit 
Notengrafiken arbeiten 
möchte, wird über kurz oder 
lang nicht um die Anschaf- 
fung eines Personalcompu- 
ters herumkommen. Der 
Komplettpreis eines MIDI- 
Systems auf der Basis des 
Atari ST mit Software liegt 
bei etwa 2200 Mark. Von 
den grafischen Fähigkeiten 
her ist der Amiga noch bes- 
ser geeignet, auch liegen die 
Investitionskosten für die 
Hardware (Computer plus 
Interface-Steckkarte) niedri- 
ger. Allerdings steckt der 
deutsch MIDI-Software- 
Markt für den Amiga noch 
in Kinderschuhen, und viele 
Software-Firmen haben sich 
bereits auf Atari festgelegt. 
Derzeit ist nur das amerika- 
nische „Pro-MIDI-Studio“ 
von Mimetics in Deutsch- 
land erhältlich, welches mit 
seinem modularen Aufbau 
neue Maßstäbe setzt; von 
den Editiermöglichkeiten ist 
es aber den meisten C64- 
Programmen unterlegen. 


Ideale Sternbox 


MIDI-Kabel sollten eine 
Länge von 15 Metern nicht 
überschreiten, da sonst Lei- 
tungsverluste und Störein- 
streuungen zu fehlerhaftem 
Datentransport führen kön- 
nen. Die Kettenschaltung 
nach Abbildung 1 stellt zwar 
die billigste Lösung eines 
MIDI-Netzes dar, ist aber 
auch störanfälliger als die 
Sternschaltung. Fällt ein 
Glied am Anfang der Kette 
aus, so kann die Informa- 
tion die nachgeschalteten 


Geräte nicht mehr erreichen. 
Derartige, meist durch feh- 
lerhafte MIDI-Daten ausge- 
löste Ausfälle treten häufi- 
ger auf, als es MIDI-Enthu- 
siasten (wie zum Beispiel 
Verkäufer in einschlägigen 
Musikgeschäften) zugeben. 
Ist es dennoch passiert, so 
hilft manchmal das kurzzei- 
tige Wechseln der Klangpro- 
gramme. Wer auf Nummer 
Sicher gehen will, unter- 
bricht am gestörten Instru- 
ment kurzzeitig die Strom- 
versorgung, ein Verfahren, 
das C64-Besitzern geläufig 
sein sollte! Denn auch an 
Musikgeräten fehlt stets der 
Reset-Taster. 

Die meisten Probleme lassen 
sich vermeiden, wenn man 
zirka 150 bis 300 Mark in 
eine MIDI-THRU-Box inve- 
stiert. In der Sternschaltung 
verkürzen sich die effektiven 
Kabellängen und ein Geräte- 
ausfall wirkt sich nicht auf 
das gesamte MIDI-Netz aus. 
Wegen ihres einfachen Auf- 
baus ist ein Ausfall der im 
Zentrum des Sterns sitzen- 
den MIDI-Box de facto aus- 
zuschließen. 


(Joachim Göthel) I 
Bezugsquellen: 

MIDI-Hard- und Software für C64 
C-LAB 


Postfach 71 04 46 
2000 Hamburg 71 


MEV Musik und Elektronik 
Karl-Hromadnik-Straße 3 
8000 München 60 

Telefon: 0 89/83 50 31 


Steinberg Research / TSI GmbH 
Neustraße 12 
5481 Waldorf 


MIDI-Hard- 
Amiga 


Print Technik 
Nikolaistraße 2 

8000 München 40 
Telefon: 0 89/36 81 97 


und Software für 


Softwareland 
Franklinstraße 27 

CH-8050 Zürich (Schweiz) 
Telefon: 00 41-1-3 11 59 59 


EINSICHTEN AUS DEM LAND DER UNBEGRENZTEN SENDEZEITEN: 


Anzeige 


Have you noticed that whenever they want to 
drive home a selling point at the close of a 
TV commercial, they always print the words 
on the screen? 


Print works. Because reading is believing. And 
it works best in magazines and newspapers. 


Created by INSIDE PRINT Magazine, USA, 
the voice of print advertising 


ENTE EITER WERE ED, 


Wir stellen Ihnen hier - frei über- 
setzt und ohne weiteren Kommen- 
tar - im Original eine Anzeige 
vor, die auf die amerikanische 
Werbeszene zielt: 


Ist Ihnen das schon mal aufgefal- 
len: immer, wenn jemand ver- 
sucht, zum Schluß eines TV-Spots 
eine wichtige Botschaft in der 
Erinnerung der Zuschauer festzu- 
machen, zeigt er diese Botschaft 
auf dem Bildschirm gedruckt. 


Das gedruckte Wort hat Kraft. Weil 
man stärker glaubt, was man liest. 
Und diese Kraft wirkt am besten in 
Zeitschriften und Zeitungen. 


Die Zeitschriften 


WINTERSTRASSE 50, 5300 BONN 2 


4 WETTBEWERB 


ws 


70.000 MARK ZU GEWINNEN 
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eue Computer benöti- 
gen neue Software. Der 

Amiga ist prädestiniert 

dafür, Spielkonzepte zu 
verwirklichen, an die heute noch kei- 
ner denkt. Damit sich die Program- 
mierer mal so richtig den Kopf über 
neue Spiele für den Amiga zerbrechen, 
haben Run und Time Warp Produc- 
tions einen Wettbewerb ausgeschrie- 
ben, der Gewinne im Wert von über 
70 000 Mark beschert. Da nicht jeder, 
der gute Ideen beisteuern kann, auch 
ein guter Programmierer ist, gibt es ei- 
nen separaten Konzeptwettbewerb. 
Tolle Vorschläge, zu Papier gebracht, 
mit Grafikentwürfen und Storybook, 
bringen dem Gewinner satte 3000 
Mark ein. Auch der zweite Preis und 
der dritte Preis sind ein Anreiz, die 
Ideenfabriken anzukurbeln. 
Den Vogel schießt natürlich der Ge- 
winner des Programmierwettbewerbs 
ab. 40 000 Mark wird er sein eigen 
nennen können. Der zweite Sieger er- 
hält 10 000 Mark und fliegt zu einem 
Besuch von Cinemaware in die USA, 
Der dritte Preis ist von Commmodore 
gestiftet: Ein Amiga 2000 mit allem 
Drum und Dran — AT-Karte, Hard- 
disk usw. Ihm winkt ferner noch die 
Veröffentlichung seines Programmes 
in der RUN oder Amiga Welt, gegen 
Honorar natürlich. Der Beitrag des 
vierten Preisträgers wird als Listing 
des Monats veröffentlicht, was immer 
noch 2000 Mark einbringt. Alle weite- 
ren Einsender können mit der Veröf- 
fentlichung in RUN oder Amiga Welt 
rechnen. 
Einsendeschluß 
Bis zum 1. 2. 1988 müssen die Anmel- 
deunterlagen vorliegen. Sie beinhalten 
neben den Angaben zur Person die 
komplette Beschreibung des Wettbe- 
werb-Beitrages und alle bis zu diesem 
Termin fertiggestellten Programmtei- 
le, sowie eine Erklärung über die 
Überlassung des Copyrights. Wir 
empfehlen allen Teilnahmewilligen, 
sich weit früher anzumelden, da so die 
Möglichkeit besteht, bei auftretenden 
Programmproblemen einen gewissen 
Support zu leisten. 
Am 15. 2. 1988 ist endgültig letzter 
Abgabetermin. Eine sechsköpfige 
Jury aus Mitarbeitern von Commodo- 
re, Time Warp Production und RUN, 
wird dann über die Einsendungen be- 


finden und einen erlauchten Kreis von 
fünf Wettbewerbsteilnehmern zum 
Commodore-Werk nach Braun- 
schweig einladen. Fachgespräche mit 
Entwicklern, Werksbesichtigung und 
Mittagessen stehen dann auf der 
Tagesordnung. Auf der Hannover- 
Messe CeBIT im März 1988 werden die 
endgültigen Gewinner bekanntgegeben. 
Sollte übrigens unter den Einsendun- 
gen kein Programm dabei sein, wel- 
ches des ersten Preises würdig ist, be- 
hält sich die Jury die Aussetzung die- 
ses einen Preises vor. Dies erscheint al- 
lerdings unwahrscheinlich, da es mitt- 
lerweile eine ganze Reihe hervorragen- 
der Programmierer für den Amiga 
gibt. Also an die Tasten geschwungen, 
Köpfe rauchen lassen und dabei die 
Anmeldung nicht vergessen. 

Der Rechtsweg ist ausgeschlossen. 


1. Preis 
40 000 Mark 

2. Preis 
10 000 Mark und eine Reise nach 
Cinemaware/USA 

3. Preis 
Amiga 2000 mit AT-Karte und 
Harddisk 

4. Preis 
Listing des Monats — 2000 Mark 


1. Preis 

3000 Mark 
2. Preis 

2000 Mark 
3. Preis 

1000 Mark 


Anmeldeschluß: 1. 2. 1988 
Einsendeschluß: 15. 2. 1988 
Copyrighterklärung an: 

Time Warp Production, Gütersloh 
RUN — CW-Publikationen, München 
Alle Einsendungen erfolgen an: 


CW-Publikationen 

Redaktion RUN 

Kennwort „Amiga-Wettbewerb“ 
Rheinstr. 28 

8000 München 40 
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hne Maus läuft 
auf dem Amiga 
fast nichts. Was 
aber ist, wenn dieses 


wertvolle, unverzichtbare 
Instrument kaputt geht? 
Oder wenn der Wunsch 


nach einer Zweit-Maus auf- 
kommt; zum Beispiel, weil 
Marble Madness mit der 
Maus viel besser spielbar ist 
und sich der zweite Spieler 
mit dem Joystick benachtei- 
ligt fühlt? 

Schreiten wir also zum Er- 
werb eines solchen Gerätes: 
Vorwahl, Nachwahl, Durch- 


die Ecke, einzeln erhältlich, 
lieferbar, erschwinglich, für 
nur 99 Mark: Die Maus für 
den Atari ST! 

Da müßte doch was zu 
machen sein? Der Stecker 
sieht ja recht ähnlich aus, 
um nicht zu sagen, es ist ge- 
nau der gleiche, 9-polig, 
Sub-D, Weiblein, Joystick- 
Norm. Auch die Mechanik 
gleicht der des Amiga auf’s 
Haar. Das sollte doch auf 
Anhieb funktionieren? 
Natürlich nicht. Aber ein 
Vergleich der Anschlußbil- 
der offenbart weitreichende 


HARDWARE 


EINE MAUS GEHT FREMD 


Soll eine Maus solo erworben werden, zeigt sich erst, wie 
kostspielig sie ist. Doch wider Erwarten duldet die Freundin auch eine 
fremde, die zudem billiger ist. 


wahl. — „Ja, hallo? Ich 
brauche eine Maus für den 
Amiga. Solo.“ — „Ja, ohne 
Computer.“ — „Nein, nur 
die Maus.“ — „Wie, gibt es 
nicht?“ — „Vielleicht als Er- 
satzteil?* — (Da schau her, 
also doch.) — „Wieviel soll 
die kosten?? Können Sie den 
Preis mal von Lire in D- 
Mark umrechnen?“ — „Ach 
das war schon D-Mark.. . .“ 
(Stöhn! 275 Mark. Werden 
die noch von Hand gefer- 
tigt?) — und nun ganz vor- 
sichtig: „Wie lange würde 
das denn dauern, bis die da 
ist?“ — „Einen Monat??“ 
— „Ach so, nur wenn ich 
Glück habe. . .*“ 

An dieser Stelle entschließt 
sich möglicherweise auch 
der tapferste Verfechter von 
original Commodore-Zube- 
hörteilen, auf ein Fremdfa- 
brikat auszuweichen. Nur, 
auf welches? 

Sein Blick schweift umher 
und da sieht er sie: Im Grab- 
bel-Tisch, im Kaufhaus um 


u.“ EBEN 


Übereinstimmung und nur 
einen kleinen Unterschied: 
Die Leitungen 1 und 4 sind 
bei den beiden Mäusen ver- 
tauscht. Das ist auch schon 
alles. 


Verwandtschaft 
zwischen Mäusen 


Zwar scheint zunächst die 
Platine der Amiga-Maus et- 
was reicher bestückt, doch 
offenbart Ataris Nager die 
selbe Elektronik, sobald 
man sich die Platine von un- 
ten anschaut: Hier ist alles 
mittels Oberflächenmontage 
(SMD-Technik) etwas kom- 
pakter ausgefallen und auf 


der Lötseite versteckt. 
Vertauscht man die beiden 


Leitungen, so funktioniert 
Ataris Low-cost-Nager auch 
am Amiga einwandfrei. Am 
besten geschieht das in der 
Maus selbst. Dabei kann 
man die Maus endgültig 
Amiga-kompatibel machen, 
indem man die beiden Dräh- 
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Universelle Maus für Amiga und St 


Stecker 


Verdrahtung des Adaptersteckers 


te einfach umlötet. Alterna- 
tiv dazu gibt es die Kombi- 
Maus mit einem kleinen 
Schalter im Gehäuse oder, 
für die ganz Vorsichtigen, 


Version 1: 
Das Adapter- 
kabel 


Version 2: 
Endgültiger 
chirurgischer 
ingriff 


Die Version 3: 
Kombi-Maus 


eine Anpassung mittels 
Adapterkabel, wobei man 
gleichzeitig die Zuleitung et- 
was verlängern kann. 


Günther Worgk [3 


Benötigt werden je ein Stek- 
ker und eine Buchse 9-polig 
Sub-D, und ein 8- oder 9- 
adriges Kabel, Länge je 
nach Geschmack (aber nicht 


Maus auf den OP-Tisch, 
aufgeschraubt (Tupfer!), ein 
Blick ins Innere, oh toll, Ka- 
bel führt auf numerierte 
Steckleiste (Schere!), schnell 
1 und 4 durchtrennen und 
vertauschen. Haaaalt! Rein- 
gefallen! Operation gelun- 
gen — Patient tot. 


Wie Version 2, nur daß man 
noch einen 2-mal-um-Schal- 
ter und etwas mehr hand- 
werkliches Geschick benö- 
tigt. Dadurch erspart man 
sich ein weiteres Adapterka- 
bel in seiner Sammlung und 
kann die Maus trotzdem 
wahlweise am ST oder am 
Amiga anschließen. Der 
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Verdrahtung des Umschalters 


zu lang, sonst leiden die Si- 
'gnalflanken und die Maus 
funktioniert nicht mehr zu- 
verlässig). Die meisten An- 
schlüsse an Stecker und 


Das wäre ja auch zu einfach 
gewesen. Natürlich ist die 
Numerierung an der Steck- 
leiste nicht mit der am Joy- 
stick-Stecker identisch ... 
also, entweder selbst mit ei- 
nem Durchgangsprüfer er- 
mitteln oder vertraut folgen- 
der Anleitung: Es sind die 


Schalter sollte so klein sein, 
wie man ihn nur bekommen 
kann, denn der Platz ist 
recht knapp. Die geeignetste 
Stelle für die Montage ist 
wohl auf der linken Maus- 
seite, möglichst weit hinten, 
damit der Schalter später im 
Betrieb nicht stört. Auf je- 
den Fall muß man sich ge- 


gen 


die Maus 
von innen 


Buchse werden 1:1 verbun- 
den. Pin 5 ist nicht belegt 
und die Pins 1 und 4 müssen 
natürlich überkreuz ver- 
tauscht werden. 


braune und die blaue Lei- 
tung, entsprechend Pin 1 
und Pin 5 der Steckleiste. 
Diese beiden durchtrennen 
und überkreuz zusammenlö- 
ten, gegen Kurzschluß isolie- 
ren und die Maus wieder zu- 
sammenschrauben — Das 
ist alles. 


nau davon überzeugen, daß 
der Schalter auch an die vor- 
gesehene Stelle paßt, weil 
der Deckel der Maus viele 
Nippel aufweist, die gerade 
an den schönsten Stellen in 
das Bodenteil hineinragen. 
Und nun viel Spaß bei dem 
Murmel-Klassisker Marble 
Madness... 
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ISCovery 
— The Ami- 
ga Disk Edi- 
tor, nennt sich 
ein Diskettenmonitor, der 
mehr als nur zielloses Sto- 
chern in Spuren erlaubt. Re- 
parieren von defekten Dis- 
ketten, Organisieren, Ord- 
nung zu schaffen und Archi- 


vieren sowie Diskettenmani- 
pulationen aller Art ermög- 


licht DISCovery sowohl 
dem Fortgeschrittenen als 
auch dem Anfänger. 

Handelt es sich bei soge- 
nannten Diskettenmonito- 
ren meist um Kopierpro- 
gramme mit nur sehr einge- 
schränkten Funktionen zur 
Modifikation von Daten, so 
läßt sich mit DISCovery ge- 
radezu jeder Winkel Ihrer 
Disketten erforschen. 

Jeder Amiga-Benutzer ist im 
Falle von Lesefehlern, verse- 
hentlich gelöschten Files, 
zerstörten Disketten oder 
ähnlichen Katastrophen 
wohl schon einmal näher 
mit der Diskettenverwaltung 
konfrontiert worden. Dabei 
wird es ihm, in Ermange- 
lung von Dokumentation 
und Software, wie folgt er- 
gangen sein: hilfloses Tap- 
pen im Dunkeln mit Hilfe 
einiger etwas antiquiert an- 
mutender Hilfsprogramme, 
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die letzten Endes doch kein 
Bit vor der Vernichtung be- 
wahren können. 

DISCovery setzt sich aus 
verschiedenen Funktions- 
modellen zusammen, die je- 
weils ein bestimmtes Gebiet 
der Diskette abdecken. So 
ist das Sector-Modul wohl 
mit dem gleichzusetzen, was 


leichte Erreichen von inhalt- 
lich zusammengehörigen 
Blöcken durch Menüpunkte 
runden ein Modul ab, das 
den Vergleich mit anderen 
Diskettenmonitoren - nicht 
scheuen muß. 

Eine Ebene tiefer geht das 
Tracks-Modul: Sogar defek- 
te Spuren, die sonst nicht 


Sektor (und hier oft auch 
nur ein paar Bytes) defekt 
ist, sind so zumindest 90 
Prozent der Daten gerettet. 
Durch das Setzen globaler 
Schalter kann für jedes Mo- 
dul der Wechsel von Disket- 
ten (um versehentliches 
Rückschreiben auf die fal- 
sche Diskette zu verhindern) 


KATASTROPHENHELFER 


Am AmigaD0S scheiden sich die Geister: Loben die einen seine extreme 
Datensicherheit, spotten andere, daß dies bei solchen Laufwerken auch 
nötig sei. Hebt man die kaum zu überbietende Flexibilität des Dateisystems 
hervor, so kann man sicher sein, daß der Hinweis auf die daraus 


resultierende Langsamkeit bei bestimmten Operationen nicht unterbleiben 
wird. Jetzt gibt's etwas, das die Geister wieder eint: DISCovery ist ein 
Diskettenmonitor, der bei allen Datenkatastrophen hilfreich ist. 


man so landläufig mit dem 
Begriff Diskettenmonitor 
assoziiert. Mit dem Lesen, 
Ändern und Schreiben von 
Blöcken sind jedoch nur ein 
Bruchteil der Funktionen 
DISCovery erfaßt. Verschie- 
dene Darstellungsformate 
wie Bytes bis Langworte, 
oktal, dezimal oder hexade- 
zimal, ASCII-Äquivalente 
und weiteres mehr suchen 
ihresgleichen. Cursorposi- 
tionierung mit Maus und 
Tastatur und Eingabemög- 
lichkeit von Zahlen, ASClIIs 
und sogar Steuerzeichen 
etwa in Form von „CR LF* 
sind ebenso selbstverständ- 
lich wie die komplexe Such- 
funktion, die nach beliebi- 
gen, wahlweise auch an Po- 
sitionen gebundene Werte- 
folgen in Bolckbereichen 
und -ketten fahnden kann. 
Automatische Ausgabe von 
aktuellem Blocktyp, Kor- 
rektur von Prüfsumme, Di- 
rectory-Hashing und das 
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„Filenote“ hängt Programmen Kommentare an. Im Hintergrund das sortierte Di- 


rectory mit den relevanten Filedaten. 


einmal mehr vom Track- 
disk-Device (und somit den 
meisten anderen Monitoren, 
dem „DiskEd“ oder dem 
„DiskDoctor“, zweier mit- 
gelieferter Utensilien der 
Workbench-Diskette) ak- 
zeptiert werden, lassen sich 
lesen und reparieren. Und 
da meist nur ein einzelner 


verboten oder gar der Disk- 
Validator (der Prozeß, der 
die Diskette gleich nach Ein- 
legen bearbeitet) abgeschal- 
tet werden, um zu vermei- 
den, daß bereits „ange- 
knacksten“ Disketten der 
Rest gegeben wird. 

Auf der DOS-Ebene findet 
sich das Directory-Modul, 


das eine geordnete Anzeige 
aller Dateien und Verzeich- 
nisse bietet (etwa eine Kom- 
bination von „LIST“ und 
„DIR OPT A“). Kommenta- 
re, Löschschutz, Datum, 
Namen und andere zu Datei- 
en oder Schubladen gehöri- 
ge Attribute lassen sich mo- 
difizieren, es erleichtert, 


durch „endlose“ Direkto- 
ries, wie sie sich oft auf Dis- 
ketten kopiergeschützter 


Software finden, nicht aus 
der Ruhe bringen und igno- 
riert derartige Wiederholun- 
gen einfach. Da hier, wie 
auch in allen anderen Modu- 
len, eine Ausgabe auf Druk- 
ker durchführbar ist, lassen 


Filedaten können auch in Dezimalform dargestellt werden. Im Vordergrund der 


komfortable Eingaberequestor. 


Überblick über den Inhalt 
seiner Disketten zu behal- 
ten. Eine Kopierfunktion, 
die mit wenigen Tastendrük- 
ken auch in verschiedenen 
Unterverzeichnissen ver- 
streute Files oder Directories 
auf ein beliebiges Ziel (so 
auch die RAM-Disk) ko- 
piert, wird Ihnen ebenfalls 
viel Arbeit abnehmen. Über- 
dies können neue Einträge 
kreiert und somit gelöschte 
Files wieder zum Leben er- 
weckt werden sowie Teile 
des Inhaltsverzeichnisses 
nach Wunsch entfernt, ver- 
schoben und eingefügt wer- 
den. Dies ermöglicht es, Ar- 
beiten, für die sonst eine 
Unzahl, beispielsweise an 
RENAME-Befehlen, zu ge- 
ben sind, in Sekunden 
durchzuführen. Versuchen 
Sie doch einmal, ein Inhalts- 
verzeichnis aufzulösen, 
ohne den Inhalt löschen zu 
wollen! 

Das Modul läßt sich auch 


sich so auch übersichtliche 
Listen erstellen. 

Mit Hilfe des Bitmap-Mo- 
duls kann sich der Anwen- 
der einen Eindruck über die 
Belegung der Diskette und 
Verteilung der Daten auf 
Disketten verschaffen. Sek- 
toren können alloziert- und 
freigegeben werden, und 
wahlweise zeigt DISCovery 
auch an, welcher Art ein 
Block ist, ob es sich also um 
einen Datenblock, ein Direc- 
tory, einen Fileheader oder 
was auch immer sonst han- 
delt. 

Ganz besonders beeindruk- 
kend ist das Filemodul. Hier 
kann der Inhalt eines Files 
mit Funktionen, die denen 
des Sector-Moduls ähneln, 
geändert werden. Dabei 
muß sich der Benutzer we- 
der um Prüfsummen, Ver- 
kettungszeiger, noch um an- 
dere Verwaltungsdaten 
kümmern, da diese Arbeit 
vollständig von DISCovery 
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übernommen wird und im 
Datenfenster gar nicht erst 
in Erscheinung tritt. Sie 
können nun nahezu nach 
Belieben in fremden Dateien 
herumstückeln. Anpassung 
von Texten, Bildschirmgrö- 
ße oder Menüs ist mit der 
vorhandenen Suchfunktion 
kein Problem. 

Die Liebe zum Detail zeigt 
sich in Funktionen wie etwa 
„Alignment“, die auch im 
Sectormodul implementiert 
ist: Wählen Sie, ob Sie lieber 
möglichst viele Daten auf 
dem Schirm haben möchten, 
oder ob Ihnen eine „glatte“ 
Zweierpotenz an Elementen 
pro Zeile lieber ist. Der File- 
name-Requester, der eine 
Auswahl des zu bearbeiten- 
den Files bereits während 
des Ladens des Inhaltsver- 
zeichnisses gestattet (be- 
kannt aus TxED), zeugt von 
der Philosophie, die hinter 
dem Programm steht ebenso 
wie seine Geschwindigkeit 
bei Bildaufbau, Datenaus- 
gabe und Scrolling. 


Funktionen zur selbsttätigen 
Prüfung auf Fehler der 
Trackdisk-Ebene und Ami- 
gaDOS-Lesefehlern mit aus- 
führlichen Diagnosemeldun- 
gen runden das Programm 
ab. 

Wenngleich nahezu alle 
Funktionen über Menüs 
aufgerufen werden können, 
so wurden für den geübten 
Anwender auch sogenannte 
„Menu-Shortcuts“ einge- 
baut, die eine Steuerung von 
der Tastatur aus erlauben. 
Auf den ersten Blick etwas 
negativ fällt die für den mit 
Effekten verwöhnten Ami- 
ga-Benutzer doch recht 
nüchterne Aufmachung des 
Programms auf, die aber 
schlußendlich doch einem 
effizienten Arbeiten zugute 
kommt. 

Trotz intensiver Bemühun- 
gen ist es nicht gelungen, 
DISCovery zum Absturz zu 
bewegen. Diese Robustheit 


spricht ebenso wie das aus- 
führliche deutsche Hand- 
buch für die Eignung auch 
für Einsteiger. In der Anlei- 
tung werden systematisch 
alle Funktionen anhand von 
Beispielen erklärt, und der 
Aufbau einer Diskette und 
die dazugehörigen Informa- 
tionen sind so eingehend 
dargelegt, daß es gar den 
technischen Teil des noch 


immer nur in englischer 
Sprache erhältlichen Amiga- 
DOS-Manuals ersetzen 
kann. 

Einfache 
Bedienung 

durch Maus und 
Menüs 


DISCovery ist lauffähig auf 
allen Amigas schon in der 
Grundausstattung. Dabei 
wird, wie bisher noch immer 
viel zu selten, auf PAL-Ver- 
sionen der volle 256-Zeilen- 
Bildschirm genutzt. Die Be- 
nutzerschnittstelle „Intui- 
tion“, die Handhabung also 
durch Maus und Menüs, die 
Verwendung von scrollba- 
ren Fenstern, eine übersicht- 
liche Anordnung der Bild- 
schirmelemente und die Ver- 
träglichkeit mit parallel lau- 
fenden Programmen, tun 
ein übriges zur mühelosen 
Bedienung. 


Konsequenterweise verzich- 
ten die Hersteller auf einen 
Kopierschutz, und im Inter- 
esse, weitere Programme 
dieser Klasse zu bekommen, 
läßt sich nur hoffen, daß die 
Gemeinde der Amiga-Be- 
nutzer dies auch honoriert, 
denn durch einen Kopier- 
schutz entstehen dem ernst- 
haften User letzten Endes 
doch zu viele Probleme. 


„DISCovery — The Amiga Disk 
Editor“, Preis: 198 Mark, Demo- 
version, erhältlich bei: DTM Wer- 
bung & EDV GmbH, Poststraße 
25, D-6200 Wiesbaden, Telefon: 
0 61 21/56 00 84 
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ür viele Anwen- 
dungen ist es un- 
erläßlich oder zu- 
mindest hilfreich, 
die computerinterne Uhr im- 
mer auf dem aktuellen 
Stand zu halten. Geht es 
etwa um das Einfügen von 
Datum und Uhrzeit in Texte 
oder darum, daß die Zeit- 
markierungen von Files kor- 
rekt angegeben sind (etwa 
für automatisiertes Anferti- 
gen von Sicherheitskopien 
modifizierter Files seit der 
letzten Sicherung), so bleibt 
dem Anwender bisher nicht 
erspart, nach jedem Neu- 
start, Reset oder Absturz 
das Datum neu von Hand 
einzugeben. 

Von dieser Last befreit 
TimeSaver. TimeSaver wird 
schlicht ins Tastaturkabel 
gesteckt, wobei negativ an- 
zumerken ist, daß die Be- 
nennungen von Ein- und 
Ausgang etwas undeutlich 
angebracht sind. Vielleicht 
entschließt sich der Herstel- 
ler, das eine Kabel fest anzu- 
löten, um Verwechslungs- 
probleme gar nicht erst auf- 
treten zu lassen. Nach dieser 
einfachen Installation wird 
TimeSaver praktisch in einer 
Nische unter der Zentralein- 
heit verstaut und belegt so 
weder Platz noch Rechner- 
kapazität oder gar Schnitt- 
stellen. 

Diese ungewöhnliche Art 
der Installation garantiert 
den uneingeschränkten Be- 
trieb selbst mit problemati- 
scher Software, denn Time- 
Saver simuliert für alle seine 
Funktionen lediglich Ta- 
stendrücke! Somit ist es für 
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Daß der Amiga 1000 auch für Hardware-Hersteller 
noch interessant ist, zeigt GC Ltd mit seinem 
neuesten Produkt: Eine batteriegepufferte 
Echtzeituhr, die es in sich hat! 


Wie angegossen paßt TimeSaver zwischen Tastaturschacht und 
Netzgerät. 


den Rechner gar nicht erst 
möglich zu erkennen, ob die 
Eingabe der Uhrzeit durch 
den Benutzer oder durch 
TimeSaver erfolgt! Eine 
Verzögerung von Tastatur- 
signalen war nicht festzu- 
stellen, nur läßt sich, wie im 
Handbuch auch erwähnt, 
die rechte Shift-Taste nicht 
mehr für die „Extended Se- 
lection“ (Anwahl mehrerer 
Icons gleichzeitig) nutzen, 
da diese Taste jetzt im Dien- 
ste der Makros (siehe unten) 
steht. Doch was soll’s, es 
gibt ja zwei Tasten dieser 
Art. Ein Blick ins Innere 
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von TimeSaver offenbart 
die für diese eigenwillige 
Konzeption notwendige auf- 
wendige Hardware: Ein ei- 
gener 8-Bit-Mikroprozessor 
mit 8 KB RAM und 8 KB 
Eprom nimmt zusammen 
mit der austauschbaren Bat- 
terie, der eine Lebensdauer 
von über einem Jahr zuge- 
sprochen wird, den meisten 
Raum ein. Bei eingeschalte- 
tem Rechner wird zur Scho- 
nung der internen Energie- 
versorgung gar auf die der 
Tastatur zurückgegriffen. 

Erst diese Technik macht es 
möglich, daß zur Inbetrieb- 


nahme von TimeSaver im 
Gegensatz zu anderen Echt- 
zeituhren keine Änderung 
an der Startup Sequence 
vorgenommen werden muß! 
Lediglich die Befehle 
„DATE“ und „EXECUTE“ 
(und letzterer nur in beson- 
deren Fällen) müssen auf 
der verwendeten Bootdisket- 
te vorhanden sein. Dies stellt 
doch eine erhebliche Verbes- 
serung gegenüber der bishe- 
rigen Handhabung der Ab- 
wandlung jeder Startup Se- 
quence dar und erlaubt so 
gleichermaßen den Betrieb 
mit kopiergeschützter kom- 
merzieller Software. Denn 
wer möchte hier schon seine 
wertvollen Originaldisketten 
modifizieren? 

Doch mit der Funktion als 
Uhr sind die Möglichkeiten 
von TimeSaver, der vom 
Hersteller als „Macro- 
Clock“ bezeichnet wird, 
noch lange nicht ausge- 
schöpft. 

So gestattet TimeSaver das 
Editieren im CLI mit Cur- 
sorbewegungen, denn Time- 
Saver merkt sich 1 KB an 
Tastaturcodes, so daß frü- 
here Eingabezeilen zurück- 
geholt und geändert werden 
können. TimeSavers Hi- 
story ist nicht nur auf das 
CLI bezogen: Es kann auch 
Kommandozeilen zwischen 
verschiedenen CLI-Fenstern 
austauschen oder Eingaben 
in einem Anwenderpro- 
gramm wiederholen. Im Ge- 
gensatz zur Command Line 
History des Metacomco 
Shells übersteht die Ge- 
dächtnisstütze von TimeSa- 
ver sogar einen Crash oder 


Reboot. Wie oft während 
des Programmierens hat 
man sich gewünscht, nicht 
schon wieder alle Schritte 
für Compiler, Assembler 
und Linker neu tippen zu 
müssen. 

Des weiteren stehen für die 
Definition von Makros 7 KB 
an Speicher zur Verfügung. 
Sie können so eine beliebig 
lange Serie von Tastendrük- 
ken, auch simulierten Maus- 
bewegungen, auf die Kom- 
bination einer der Tasten 
Control, Shift, Amiga und 
ALT zusammen mit einer 
weiteren Taste abkürzen. 
Aufgrund des gleichen 


Funktionsprinzips funktio- 
niert diese Funktion ebenso 
mit jedem beliebigen Pro- 
gramm, etwa, wenn Ihr Edi- 
tor keine Makros erlaubt 


m die Signale 
hörbar zu 
machen, die von 
der Datasette an 
den Computer geschickt 
werden, baut man in den 
Rechner einen kleinen Laut- 
sprecher ein. Hierzu 
schraubt man zunächst ein- 
mal den Rechner auf. Ein 
Kabel des Lautsprechers 
wird sodann an Leiterbahn 
FB 16 des Kassetten-Ports 
angeschlossen. Das zweite 
Lautsprecherkabel bringt 
man am Expansionsport 
(erster Pin von rechts) an. 
Den Lautsprecher verstaut 
man anschließend am besten 
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oder nicht alle Tastencodes 
zuläßt. 

Wie das Datum automatisch 
beim Booten gesetzt werden 
kann, so kann ebenfalls ein 
Makro ausgegeben werden. 
Dies kommt einer Ergän- 
zung jeder verwendeten 
Startup Sequence gleich, 
ohne daß deswegen die ent- 
sprechende Diskette geän- 
dert werden muß. Man stelle 
sich hier eine RESET-feste 
RAM-Disk mit jeder Boot- 
diskette vor. 

Wahlweise kann beim 
Booten oder auch zu jedem 
späteren Zeitpunkt (wenn 
der Computer zwecks Kaf- 
feepause verlassen wird) ver- 
langt werden, ein vom Be- 
nutzer festgelegtes vierstelli- 
ges Kennwort einzugeben. 
Solange dies nicht korrekt 


erfolgt ist, ist das Keyboard 
blockiert: Kein Tastendruck 
erreicht mehr den Rechner! 
Im Lieferumfang enthalten 
ist eine deutschsprachige 
Übersetzung der als kleines 
Extra zusätzlich mitgeliefer- 
ten, 76 Seiten starken eng- 
lischsprachigen Original- 
Anleitung mit Index, die 
sich mit jedem Aspekt von 
TimeSaver ausführlichst aus- 
einandersetzt. 

TimeSaver muß passend zur 
benutzten Tastatur bestellt 
werden! Vorsicht bei Grau- 
importen, Sie erhalten sonst 
möglicherweise einen US- 
TimeSaver zu Ihrer deut- 
schen Tastatur. Darüber 
hinaus bietet der deutsche 
Exklusivdistributor einen 
Updateservice, der zu gün- 
stigen Preisen eventuelle 


LAUTSPRECHER AM 616/116 


Wer mit 616/C116 und Datasette arbeitet, braucht sich nicht mehr länger 
über den fehlenden Datasetten-Ton, zu ärgern. Zum Nachbau der Schaltung 


wird lediglich ein kleiner Lautsprecher benötigt. 


in der oberen rechten Ecke 
des C16/C116-Gehäuses. Es 
empfiehlt sich, in eine Laut- 
sprecherleitung einen Schal- 
ter zu bauen, damit der Ton 
abgeschaltet werden kann. 
Nur bei abgeschaltetem 
Lautsprecher ist eine ein- 
wandfreie Abspielung und 
Aufnahme gewährleistet. 
Sodann kann der Rechner 
wieder zugeschraubt wer- 
den. Das Auffinden von 
freien Stellen auf der Kasset- 
te beziehungsweise Pro- 
grammanfängen ist jetzt 
kein Problem mehr. 


(Detlev Elsinghorst) 


UT TER NEN. 


Anschluß des Lautsprechers 


Verbesserungen des Time- 
Saver-Eproms beinhaltet. [J 
(Ralf Babel) 


Info: Intelligent Memory, 
Basaltstraße 58, 6000 Frankfurt 90, 
Telefon: 0 69/7 07 11 02. 

Preis: 179 Mark 


Datasetten- 
Port 


Kabel zum Lautsprecher 
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GONSTRUGTION SET 


m allgemeinen besteht die 
Schwierigkeit beim Veröffentli- 
chen von Programmen darin, daß 
der Leser zwar den Source-Code 
eingeben und kompilieren kann, je- 
doch nicht Grafik- oder Sounddaten 
größerer Länge. Auch bei diesem Spiel 
liegt das Problem in der Menge an 
Grafik und Sound. Es gab zwei Mög- 
lichkeiten dies zu umgehen, zum einen 
durch Verweis auf die Run-o-thek- 
Diskette mit Veröffentlichung der 
Programmbeschreibung, zum anderen 
durch Beschränkung auf magere Gra- 
fik und nicht digitalisierte Klänge. Mit 
diesem Programm wird ein völlig neu- 
er Weg aus dieser Misere beschritten. 
Die Idee besteht in der Einbeziehung 
des Lesers, der die Grafik selbst malt 
und eventuell mit einem Digitizer die 
Sounds produziert. Außerdem ist In- 
vadercraft natürlich auch auf der Run- 
o-thek-Diskette mit allem, was an 
Sound und Grafik benötigt wird, zu 
finden. Die Grafik kann mit allen IFF- 
kompatiblen Programmen, wie De- 
luxe Paint (I oder II) oder Graphi- 
craft, erstellt werden und bildet den 
Schwerpunkt des zweiten (und letzten) 
Teils in der nächsten Ausgabe. Es 
lohnt sich die Mühe, die mit dem 
Kreieren der Daten verbunden ist, da 
man dadurch in der Lage ist, seine per- 
sönliche Invadercraft-Version, mit 
völlig anderen Akzenten, zu schaffen. 
Wer keinen Sound-Digitizer besitzt, 
der kann das Programm dennoch lau- 
fen lassen, jedoch ohne akustische 
Ausgabe. 


Außerirdische im 
Amiga 


Die Aufgabe beim Spielen von Inva- 
dercraft lautet, die Erde vor den An- 
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Invadercraft ist ein in G 
geschriebenes Actionspiel, bei 
dem nach Belieben eigene 
Grafiken und Sounds eingebaut 
werden können. 


griffen der schrecklichen Invaders zu 
schützen (Bild 1). Als Verteidigungs- 
waffe steht ein raketenbestückter Pan- 
zer zur Verfügung, der mit dem Joy- 
stick gesteuert werden kann. Zusätz- 
lich gibt es Bunker zum Schutz vor 
feindlichen Raketen, die allerdings mit 
der Zeit immer durchlässiger werden. 
Selbstverständlich bilden die Feinde 
der Erde kein festes Ziel, sondern 
wandern zwischen dem rechten und 
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Das Spiel ist in vollem Gang 


linken Bildschirmrand unaufhörlich 
hin und her. Außerdem schießen sie 
ihre Raketen des öfteren gezielt auf 
den Widersacher. Sind alle Invaders 
abgeschossen, so formiert sich nach 
kurzer Zeit eine stärkere Armee von 
Feinden und die Herausforderung im 
nächsten Level beginnt. Falls der Pan- 
zer getroffen wird, braucht der Spieler 
dennoch nicht zu verzagen, da er noch 
einige Ersatzpanzer besitzt. Wenn die 
Invaderschar, die nach jedem Rich- 
tungswechsel immer ein Stück weiter 
herunterkommt und damit versucht, 
sich der Erde gefährlich zu nähern, 


den Panzer überrollt, oder alle Ersatz- 
panzer aufgebraucht sind, ist das Ende 
des Spektakels erreicht und der Spieler 
kann seinen Namen in der Highscore- 
Tabelle, vorausgesetzt, er hat sich tap- 
fer genug geschlagen, eintragen. Ab 
und zu fahren große Raumschiffe über 
die Feinde hinweg, es sind deren Mut- 
terschiffe. Auf sie zu zielen lohnt sich, 
da eine hohe, zufällige Punktzahl, 
zwischen 100 und 300, zu erwarten ist. 
Punkte werden natürlich auch für je- 
den abgeschossenen Invader verteilt; 
10 bis 300 Punkte, je nach Art des In- 
vaders. Erscheint dem Spieler der 
Kampf zu leicht, hat er immer noch 
die Möglichkeit, fünf weitere Schwie- 
rigkeitsgrade auszuwählen. Alle Ak- 
tionen werden mit dem Joystick, in 
Port 2, unternommen, bis auf die Ak- 
tivierung der Pause, die mit der linken 
Maustaste geschieht. 


Kompiliervorgang 


Aufgrund seiner Länge wurde der ge- 
samte Source-Code in acht Teile zer- 
legt: 

invadercrafti.h Listing 1 
invadercraft2.h Listing 2 
invadercraft.c Listing 3 

lader.c Listing 4 

menu.c Listing 5 

sound.c Listing 6 

action.c erscheint in Teil 2 (nächste 
Ausgabe) 

con.c in der nächsten Ausgabe 
Invadercrafti.h und invadercraft2.h 
sind Header-Dateien, die Deklaratio- 
nen und Konstanten enthalten. Sie 
sind unbedingt zuerst einzugeben und 
im Directory „include“ des Aztec- 
Compilers (Version 3.20a) abzulegen. 
Listing 3 bis Listing 6 sind für sich zu 
kompilieren (und zu assemblieren). 


Die entstandenen Objectfiles sollten 
dann auf Diskette gesichert werden. 
Nach dem Übersetzen von „action.c“ 
und „con.c“ (Teil 2 im nächsten Heft), 
können dann alle Teile zusammenge- 
linkt werden. Kompilierhinweise sind 
am Anfang jedes Listings zu finden. 
Der Aufruf des Linkers ist in Listing 
3, „invadercraft.c“, dem Hauptpro- 
gramm, vermerkt. Listing 6, 
„sound.c“, braucht nur eingegeben zu 
werden, wenn eine Ausgabe digitali- 
sierter Geräusche erwünscht und die 
zugehörigen Datenfiles vorhanden 
sind. 


Installation und Aufruf 


Bevor man Invadercraft startet, soll- 
ten drei Directories auf Diskette ange- 
legt werden, „ic.data“, „ic.data/ 
sound“ und „ic.data/lo-res“. Die Gra- 
fikdaten und Sounddaten sind dann in 
die Directories „lo-res“ und „sound“ 
zu kopieren. Das Programm lädt Da- 
ten immer über das logische Laufwerk 
„ic.data:“, zum Beispiel „ic.data:high- 
scores“ oder „ic.data:lo-res/titelbild“. 
Dieses Laufwerk muß natürlich mit 
„assign“ vor dem Start erst einmal zu- 
gewiesen werden: 


assign ic.data: dfO:ic.data 

Die Existenz des Directorys „ic.data“ 
(nicht „ic.data:“) ist nicht unbedingt 
nötig. Man kann „sound“ und „lo-res“ 
auch auf beispielsweise „dfO:“ instal- 
lieren, und „ic.data:“ dem Laufwerk 
zuweisen, oder gleich den Disketten- 
namen in „ic.data“ umbenennen. Vor 
dem Aufruf des Programms sollte 
man unbedingt die Ram-Disk leeren, 
um genügend Speicher für die Pro- 
gramme zur Verfügung zu stellen. In- 
vadercraft kann nur vom CLI aus auf 
folgende Weise gestartet werden: 


invadercraft kick trainer 

kick steht für 1 oder 2: 

Il = vertikale Auflösung von 200 
Pixels, lauffähig auch unter Kick1.1 

2 = vertikale Auflösung von 256 
Pixels (nur unter Kick1.2 oder höher) 
trainer schaltet den Trainer an, der 
sich sehr gut zum Durchtesten aller 
Level gebrauchen läßt. 

Nach der Rückkehr des Programms, 
vorausgesetzt, daß kein Fehler aufge- 
treten ist, befindet sich eine Datei auf 
Diskette namens „highscores“, die die 
initialisierte Highscore-Liste enthält. 
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Die im folgenden verwendeten Namen 
der Objekte sind aus Bild 2 ersichtlich. 
Listing 3, „invadercraft.c“, ist das 
Hauptprogramm, welches wichtige In- 
itialisierungen vornimmt, Speicher re- 
serviert und alle anderen Programm- 
teile (indirekt) aufruft. Falls man 
Sounds digitalisieren will, sind hier am 
Anfang des Listings die Kommentar- 
zeichen („/* und */“) um die Anwei- 
sung „#define SOUND_ON“ zu ent- 
fernen (mehr zum Sound siehe unten). 
Wer Lust verspürt, einen eigenen Zei- 
chensatz (Breite 10, Höhe 8, Name 
„ic.font“ beziehungsweise „ic/8e“) zu 
entwerfen, muß ebenfalls Kommen- 
tarzeichen löschen, diesmal zu „#de- 
fine DISKFONT_ON“. Auf der Run- 
o-thek-Diskette ist ein Zeichensatz be- 
reits abgespeichert. Unmittelbar nach 
dem Start werden die Parameter aus 
der Kommandozeile übernommen und 
überprüft. Mit den Funktionen „titel- 
bildladen( )“, „salloc( )“ und „titelsla- 
den( )“ wird das Titelbild und die Ti- 
telmelodie geladen, um dem Anwen- 
der die Langeweile während der Lade- 
zeit zu vertrieben. Die dabei verwende- 
ten Funktionen „soundladen( )“ und 
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„getiff( )“ sind in Listing 6 und Listing 
4 zu finden. Mit „allocmem( )*“ wer- 
den eine Reihe von verschiedener Bit- 
maps, in Abhängigkeit von den in den 
Headerfiles definierten Konstanten, 
bereitgestellt, die zur Aufgabe haben, 
die Grafikdaten aufzunehmen. In „la- 
den( )“ werden sie dann von Diskette 
in die Bitmaps kopiert. Die Bitmap 
„iff“ dient hierbei als Zwischenspei- 
cher. Ferner wird die Highscoretabelle 
geladen, oder wenn sie nicht existiert, 
initialisiertt. Nachdem die restlichen 
Sounddaten mit „soundladen( )“ gela- 
den sind, wird, um Speicher zu sparen, 
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der für Titelbild und Titelsound benö- 
tigte Speicherplatz wieder freigegeben. 
Jetzt können weitere Bitmaps angefor- 
dert werden. Das Spiel nutzt den Dual- 
playfield-Modus des Amiga. Hierbei 
wird bekanntlich der Schirm aus zwei 
übereinander liegenden Bildern, je- 
weils bis zu acht Farben, entsprechend 
der Bitmaps „bm“ und „bm2“, zusam- 
mengesetzt. Die Missiles und die Inva- 
ders werden jeweils in einer Bitmap 
für sich alleine bewegt. So spart man 
aufwendige Hintergrund-Restaura- 
tion, was sich positiv auf die Ge- 
schwindigkeit auswirkt. Da das Eröff- 
nen eines Intuition-Screens im Dual- 
playfield-Modus nicht unproblema- 
tisch ist, werden die Funktionen der 
Graphics-Library benutzt, um den 
Schirm zu füllen. Für den Punkte- 
stand wird am oberen Rand ein High- 
Resolution-„Screen“ aufgespannt, der 
Rest ist Low-Resolution. Der Aufruf 
von „anfang( )“, einer Funktion aus 
„action.c“ (Teil 2), hat den Sprung ins 
Hauptmenü, welches in der Haupt- 
sache die Aufgabe von „menu.c“, 
Listing 5, ist, zur Folge. Nach der 
Rückkehr aus der Subroutine, dies ist 


rn . 


Nutterschiff 


%. 4- Missile getroffen 


Der Grafik-Editor 
des Spiels 
„Invadercraft“ 


der Fall wenn der Spieler den Menü- 
punkt „Exit“ aufruft, werden die 
Highscores durch „highsave( )“ abge- 
speichert und mit „closeall( )* der re- 
servierte Speicherplatz an das System 
zurückgegeben, sowie Libraries ge- 
schlossen. Weiterhin enthält „invader- 
craft.c“ zwei Routinen für die akusti- 
sche Ausgabe. Dies sind „sound( )“, 
eine Funktion, die einen Klang auf ei- 
nem der 4 Kanäle ertönen läßt, und 
„soundvol( )“, welche die Lautstärke 
der Soundausgabe regelt. 

Listing 4, „lader.c“, enthält eine La- 


derroutine für IFF-Bilder, „getiff( )“ $> 
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an die nur der Zeiger auf den Dateina- 
men, die Adresse einer Bitmap-Struk- 
tur und die Adresse eines Arrays über- 
geben werden muß. Wenn kein Fehler 
aufgetreten ist, ist die Bitmap-Struk- 
tur initialisiert, Speicher für die einzel- 
nen Planes, in denen sich dann die 
Grafikdaten befinden, reserviert und 
die Farben in das Array übertragen. 
Im Fehlerfall wird eine Meldung aus- 
gedruckt und „closeall( )* aufgerufen. 
Die Funktionen „getiff( )“, „allocbit- 
map( )“, „freebitmap( )* und „if- 
fend( )“ können auch für eigene Pro- 
gramme genutzt werden. Wichtig ist 
dabei das Öffnen der Graphics-Li- 
brary vom aufrufenden Programm 
aus und der Entwurf von „closeall( )“ 
als Fehler-Routine. 


Die Highscore-Tabelle und der Auf- 
bau zweier Menüs sind Kern von „me- 
nu.c“, Listing 5. Nachdem im Haupt- 
programm das Bereitstellen aller Da- 
ten erfolgt ist, wird die Funktion 
„hauptmenu( )“ aufgerufen, die ein 
Menü nach Drücken des Feuerknopfs 
am Schirm darstellt (Bild 2). Mit dem 
Joystick kann man unter den Punkten 
„Choose Version“, „One Player 
Game“, „Two Player Game“, „Hall of 
Fame“, „About“ und „Exit“ wählen. 
„Chosse Version“ läßt ein neues Menü 
entstehen („otherversion( )“), bei dem 
der Spieler die Wahl von insgesamt 
sechs verschiedenen Versionen Inva- 
dercrafts hat, die sich hinsichtlich Ge- 
schwindigkeit der Objekte, Schußrate 
der Invaders, etc. unterscheiden. Die 
Voreinstellungen der Versionen sind in 
„con.c“ leicht zu verändern und wer- 
den in Teil 2 erörtert. Durch Auswahl 
von „One Player Game“ oder „Two 
Player Game“, kann man Invadercraft 
alleine oder zu zweit spielen. Die ent- 
sprechenden Routinen, wie auch 
„spiel( )“, ist in „action.c“ (Teil 2) zu 
finden. Im Spiel zu zweit wird bei je- 
dem Verlust eines Panzers abgewech- 
selt. Wenn der Kampf mit den Inva- 
ders vorüber ist, kann sich der Spieler, 
bei genügend großer Punktzahl, in der 
Highscoreliste verewigen, siehe „ein- 
trag( )*. Danach verzweigt das Pro- 
gramm in die Funktion „demorot( )“ 
um im Demo-Modus zu verweilen, bis 
der Feuerknopf gedrückt wird. Dabei 
wählt der Computer nacheinander alle 
Menüpunkte an und kämpft sogar 
selbst gegen die Invaders. Der Menü- 
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punkt „Hall of fame“ dient zum An- 
zeigen der Highscore-Tabelle, wofür 
die Funktion „showhi( )“ verantwort- 
lich ist. Für jede Version steht eine ei- 
gene Tabelle zur Verfügung. „About“ 
gibt Auskunft über das Programm. 
Dazu wird ein IFF-Bild eingeblendet, 
das auf der Run-o-thek-Diskette den 
Namen mit großen bunten Lettern ent- 
hält. Natürlich ist das Bild von der 
Phantasie des Lesers abhängig, da es 
von ihm gemalt werden muß. Druck 
auf den Feuerknopf bewirkt das Ein- 
blenden eines Textes, der wiederum 
mit dem Feuerknopf quittiert wird. 
Mit „Exit“ wird das Programm verlas- 
sen. Um die Menüs zu verschönern, 
läuft im Vertikal-Blank-Interrupt, der 
alle Yso Sekunden auftritt, die Routi- 
ne „hinter( )*, die im Hintergrund 
Sterne bewegt. Eingeschaltet wird sie, 
nach Initialisierung durch „sternsetz 
()“, mit „interein( )*. Abgeschaltet 
mit „interaus( )“. Die Assembler-Rou- 
tine „rndl( )“ dient zur Erzeugung ei- 
ner Zufallszahl zwischen O0 und 65 535, 
die dann die Variable „rnd“ beinhal- 
tet. 

Listing 6, „sound.c“, braucht nur ein- 
gegeben zu werden, wenn die Ausgabe 
von Sound erwünscht und somit in in- 
vadercraft.c SOUND_ON definiert 
ist. Die Routine „salloc( )“* eröffnet 
das Audio-Device und beschafft die 
dazu nötigen Ports und IORequests. 
Das Gegenstück ist „fress( )“. Laden 
und Einblenden der Titelmelodie ge- 
schieht mit „titelsladen( )“. Laden der 
Sound-Dateien erledigt „soundla- 
den( )“, Übergabe-Parameter ist dabei 
die Nummer der Datei. 


Einbinden 
digitalisierter Sounds 


Für nahezu jedes Ergebnis während 
des Spiels, ist eine akustische Ausgabe 
vorgesehen, wobei auf eine günstige 
Ausnutzung der vier Sound-Kanäle 
des Amiga geachtet wurde. Dem inter- 
essierten Leser wird das Digitalisieren 
der Klänge, sofern er im Besitz eines 
Digitizers ist, sicher nicht schwerfal- 
len. Es brauchen selbstverständlich 
nicht alle der insgesamt 17 vorgesehe- 
nen Sounds vorhanden zu sein. Um 
den Source-Code nicht unnötig zu ver- 
längern, wurde auf einen IFF-Lader 
verzichtet, die Sound-Dateien sind 
vielmehr formatlos in das Directory 


„ic.data:sound“ abzuspeichern. Dies 
ist mit den gängigen Digitzer-Pro- 
grammen kein Problem („Raw Data“, 
Data File“ etc.). Der Dateiname, die 
frequenzbestimmende Wiedergabe- 
Rate, die Anzahl an Wiederholungen 
und die Lautstärke sind dann in 
„sound.c“, Listing 6, siehe Kommen- 
tare, einzutragen. Eine Angabe der 
Dateilänge ist nicht notwendig, sie 
wird automatisch erkannt. Die Ereig- 
nisse, welche den verschiedenen 
Sounds zugrunde liegen, sind im Sour- 
ce-Code ersichtlich. Am besten pro- 
biert man, natürlich nachdem das 
Programm ohne Soundausgabe ein- 
mal erfolgreich getestet wurde (nicht 
SOUND_ON in „invadercraft.c ver- 
gessen!), nacheinander die einzelnen 
Klänge aus, indem man alle anderen, 
durch Eintrag von 0 an Stelle des Da- 
teinamens, deaktiviert hat. Das einzige 
Problem könnte der begrenzte Spei- 
cherplatz des Amiga darstellen. Hier 
hilft nur Digitalisieren von kürzeren 
Geräuschen und Verminderung der 
Samplerate. 

In Teil 2 in der nächsten Ausgabe wer- 
den die restlichen Programmteile vor- 
gestellt und das Kreieren der Grafik 
erklärt. 


Jürgen Hertel 


Der Autor von In- 
vadercraft ist 22 
Jahre alt und 
wohnt bei Nürn- 
berg. Als Student 
A der Elektrotechnik 
im 9. Semester sind 
7 für ihn Berufsziel 
und Hobbies nicht allzuweit voneinan- 
der entfernt. Seine Leidenschaften 
sind Holografie, Chemie, Elektronik 
und natürlich Computer. Erste Kon- 
takte hatte er in der neunten Klasse 
mit einem exotischen Basicrechner der 
Firma Wang. Bereits ein Jahr später 
nannte er einen Commodore 2001 sein 
eigen. Danach folgte ein CP/M-Rech- 
ner und ein MSX-Rechner. Seit einem 
Jahr programmiert er am Amiga 1000. 
Neben kleineren Utilities schreibt er 
vor allem Programme, die in Richtung 
numerische Mathematik und 3D-Gra- 
fik weisen. Damit die Arbeit nicht zu 
trocken wird, gehören Spielereien mit 
zu seinem Programmierrepertoire. 5 
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Listing 2: Zweiter Include-File für den Aztec-Compiler. 


InvaderCraft von J.Hertel 
(C) CW-Publikationen 


"invadercrafti.h" 
Headef-File fuer Aztec C Version 3.20a. 


Dieses File muss in das include-Directory der Compiler-Diskette kopiert 
werden ! 


/* Schirm-Bitmap */ 


xA 320L /®* X-Aufloesung */ 

XAl 319L /® XA-ı */ 

AC 16L /* immer 16 Farben (Dualpf.) */ 

Vx 48L /* unsichtbare Reserve an Pixels am linken und rechten Rand 
Vielfaches von 16 | Muss groesser als Mutterschiff- 
breite+Schrittweite sein */ 

vY 20L /* Reserve nach oben und unten, groesser als Missilehoehe 
bzw. Schusshoehe + Schrittweite */ 


/* Dummy Bitmap */ 


DUMMYT 3L /* groesser als “/ 
DUMMYX 40L /* alle vorkommende */ 
DUMMYY 40L /* Objekte ”/ 


InvaderCraft von J.Hertel 
ic) CW-Publikationen 


"invadercraft2.h"” 


Header-File fuer Aztec C Version 3.202. 


s File muss in das include-Directory der Compiler-Diskette kopiert 
n 


/* Invader */ 


INT 3L /* Tiefe (3 = 8 Farben) “ 

INEX 32L /* x-Abstand der Invaders im IFF-Bild */ 

INEY 16L i» y-Abstand */ 

INA 30L A) Invaderanzahl (Anzahl an verschiedenen 
Invadertypen + 1 (fuer eigenen Panzer) */ 

PHASEN 6L Ad 6 Bewegungsphasen pro Invader */ 

OFF1 4L Ad x-Offser */ 

OFF2 1L /* y-Oofftser */ 

ROl 24L ’“ x-Abstand von Invader zu Invader (waehrend 
des Spiels */ 

4* y-Abstand in action.c als Variable festgelegt 

(je nach Bildschirm-Y-Aufloesung) */ 

KO3 24L /* der Invader */ 

KO4 14L /* “/ 

xo5 10 /» maximale Invaderanzahl in einer Reihe */ 

Ko6 6 hd maximale Invaderanzahl uebereinander */ 

INBEWSOUNDZAEMAX 2*PHASEN /* Sound */ 

INX INEX*INA /» Bitmap-Groesse */ 

INY INEY 

STRAFE EIZAEMAXNORM (version) *20 /* Explosion des eigenen Panzer 


verlangsamen */ 
EIBEWSOUNDZAEMAX 2 


/* Mutterschiff */ 


Wdefine MUTANZ 3L /* Anzahl an verschiedenen Mutterschiffen */ 

#define MUTT 3L /» Tiefe */ 

#define MUTEXPPHASEN 4L /* Anzahl an Explosionsphasen */ 

define MUTPHASEN 2L /* Anzahl an Bewegungsphasen */ 

define MUTHEIGHT 16L /* x-Abstand (analog INEX) */ 

define MUTWIDTH 32L 

#define MUTOFFI 1L /* Offset (analog OFFi) */ 

#define MUTOFF2 3L 

#define MUTKOI 30L /* Groesse (analog Ko3) */ 

#define MUTKO4 10L 

“define MUTWK 200 /* Wahrscheinlichkeit fuer Erscheinen eines 
Mutterschiffs */ 

#define MUTY VY+SL /®* y-Koordinate */ 

#define MUTPUNKTE 100 /* Mindestpunktzahl */ 

#define MUTPUNKTERND 200 /* 0...MUTPUNKTERND Punkte werden zufaellig 
vergeben */ 

#define MUTBEWSOUNDZAEMAX 3 

/* Schuss */ 

#define SCHPHASEN IL /* versch. Bewegungsphasen */ 

#define SCHHEIGHT 16L /* wie oben */ 

define SCHWIDTH 161 

#define SCHT 2L /* 4 Farben reichen fuer Schuss */ 

#define SOFFi 7L /* wie oben */ fi 

“define SOFF2 OL 

“define SKO3 IL /* wie oben ®#/ 

#define SKO4 14L 

“define SHS IL /* sensitiver Punkt (Hot Spot) etwa SKOo3/2 */ 

/* relative HotSpot-y-Koordinate = 0 «*/ 
#define SAX 9L Schuss-Koordinaten relativ zum Panzer */ 
#define SAY BL atz zwischen Panzer-Kanone und 


Schuss zu minimieren! */ 


/* Missile */ 


MISHEIGHT 161 


RIESTER VER BON, 


/* Bitmap fuer Status-Balken */ 
“define HIXA 540L /* HiRes */ 
define HIYA ı1L 

#define BLKLINE 2L 

#define HIT 2L 

#define HIAC 4L 


/* Max. 6 verschiedene Versionen implementiert */ 
define MAXVERSIONS 6 


struct format | /* £uer jeden Sound eine Struktur */ 
char *nane; 

UWORD period,cycles, volume; 

UBYTE *buffer; 

ULONG len; 

1; 


#define ANZSOUNDS 17 /* Anzahl an Sounds */ 
struct liste | 

ULONG score; 

char who[8); 


Fi 
#define SLoTs 13 /* Anzahl an Eintraegen fuer Highscore-Tabelle */ 


define ABOUTHEIGHT 38L /* Hoehe */ 

#define ABOUTWIDTH 320L /* und Breite des IFF-Bilds, das bei der 
EIOReN des Menuepunkts 'About' eingeblendet wird. Hoehe nicht groesser 
als 140 ! »/ 


jefine MISWIDTH 16L 

efine MISPHASEN 3L 
#define MIST 2L 
#define MISANZMAX 10 
“define MOFFI 6L 
“define MOFF2 2L 
“define MKOJ_ JL 
“define MKO4 14L 


MRS IL 

MHSDX IL /* Zwei HotSpot-x-Koordinaten: MHS+MHSDX 
MHS-MHSDX */ 

MAX 12L 

MAY 11L 

MHSANZ 3 /* Drei HotSpot-y-Koordinaten */ 


/* HotSpot-y-Koordinaten in action.c definiert »/ 


/* Explosion eins Invaders */ 

#define EXPPHASEN 6L /* Explosionsphasen */ 

#define EXPWIDTH INEX /* sonstige Daten wie Invader !!e/ 
define EXPHEIGHT INEY 


“define EXPT InT 

/* Bunker */ 

define BT 3L /* unbedingt 3, da Bunker nur aus Farbe Nr.7 besteht */ 
define BWIDTH 32L /* wie oben */ 


#define BHEIGHT 32L 

define BOFFI JL 

“define BOFF2 4L 

Wdefine BKOI 27L 

define BRO4 24L 

define BANZ 4 /* wieviele Bunker */ 
#define BKO1 BOL /* Abstand zweier Bunker */ 
Wiefine BX VX+(XA-(BANZ-1)*BKOL-BKOI)/2 


/* Bunker durch Schuss getroffen */ 


define BSSWIDTH 16L /* Abmessung des Schadens */ 
#define BSSHEIGHT 10L 
#define BSHS 7L /* x-Koordinate des Treffer-Zentruns */ 


/* Bunker durch Missile getroffen */ 
define BSIWIDTH 161 

Wdefine BSIHEIGHT 10L 

“define BIHS 7L 


/* Explosion bei Zusammenstoss von Missile und Schuss */ 

/* keine verschiedenen Phasen */ 

#define MTWIDTH 16L 

#define MTHEIGHT 111 

#define MTT 2L 

define MTOfFfi OL 

#define MTOFF2 OL 

define MTROJ 111 

#define MTKOs 11L 

define MTHSX SL 48 lative x-Koordinate auf Zentrum der Explosion */ 
define MTHSY 5L du » y-Koord. */ 

/* Verzindern der Schussrate bei andauerndem Druck auf Feuerknopf */ 
define DAUERFEUERBRENSE 100/SCHZAEMAX [version] 


/* Resultat von inbew() bzw. leer() oder restbewl)*/ 
define ABGESCHOSSEN 1 

#define LETZTERPANZER 2 

#define UEBERROLLT 3 

define KEINE_IN_MEHR 4 

#define QuIT 5 

define DEMO 6 

define QUITDEMO 7 


define PAUSE 300 /* Laenge der Pause zwischen den einzelnen 
Leveln »/ 


#define ANZFREIPANZER 7 /* Anzahl an moeglichen Freipanzern */ 


#define MAXLEVEL 16 /* Anzahl an moeglichen Levein ( = verschiedene 
Aufstellungen der Invaders) */ 
#define DEMOTIME 8000 /* Laenge des Demo-Modus */ 
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/* 

Invaderlraft von J.Hertei 

(c) CW-Publikationen 

Hauptprogramm "invadercraft.c" 

Kompilieren und Linken mit Aztec C Version 3.20a. 


Im Include-Directory muessen sich die Header-Files "invadercrafti.h" und 
"invadercraft2.h" befinden! 


Aufruf: cc invadercraft -a 
as invadercraft 


Linken: in invadercraft.o lader.o menu.o action.o con.o -1c 
Wenn Sound-Files vorhanden und Sound eingeschaltet (s.u.): 
in invadercraft.o lader.o menu.o action.o con.o sound.o -ic 


“7 


/* Falls digitalisierte Klaenge verfuegbar, Kommentarzeichen um #define- 
Statement entfernen! */ 

/# 

#define SOUND_ON 

„ 


/* Falls spezieller Zeichensatz ("fonts:ic/8e + fonts:ic.font”) verfuegbar, 
Kommentarzeichen um #define-Statement entfernen! */ 

Ir 

#define DISKFONT_ON 

“/ 


#include <intuition/intuition.h> 
#include <graphics/gfxbase.h> 
#include (graphics/gfxmacros.h> 
#include chardware/dmabits.h> 
#include thardware/custom.h> 
#include (exec/memory.h> 
#include «libraries/dos.h> 
#include <devices/audio.h> 


/* Vor Compiler-Aufruf unbedingt "invadercrafti.h” und "invadercraft2.h” 
in include/ - Directory kopieren! */ 


include <invadercrafti.h> 
#include <invadercraft2.h> 


int _Dorg(); 


extern struct IOAudio *ioal]; 

extern struct format sdata[]; 

extern int demo; 

extern struct liste slots[MAXVERSIONS) [SLOTS]; 
extern long Read() ‚Write(}; 

extern APTR AllocMem() ‚OpenLibrary(); 


struct Intuitionbase *IntuitionBase; 

struct Library *DiskfontBase; 

struct GfxBase *GfxBase; 

struct RastPort rp,rp2,rphi; 

struct BitMap bmhi,bm,bm2,inb,schb,misb, expb, bunb, dummyb,mistreb, 
mutb,bunkerbuff [2] .abil,bssb,bsib,iff; 

struct View v,*rold; 

struct ViewPort vp,vphi; 

struct RasInfo ri,ri2,rihi; 

struct ColorMap *cm, *cmhi, *GetColorMap(); 

#ifdef DISKFONT_ON 

struct TextAttr textattr=| (STRPTR)"ic.font",8,FS_NORMAL, FPF_DISKFONTI ; 
#endif !DISKFONT_ON 

#ifndef DISKFONT_ON 

struct TextAttr textattr=| (STRPTR)"topaz.font",10,F5_NORMAL,FPF_ROMFONT| : 
#ondif !DISKFONT_ON 

struct TextFont *f£ont, *OpenDiskFont () , *OpenFont (); 

struct Custom *custom=0xDFF000; 

struct CIA *ciaamOxBFEOOL: 

struct *£h,*Open(); 

struct Screen "screen, *OpenScreen(); 

struct NewScreen newscreen=[0,0,320,0,41; 

struct NewWindow newwindow=[0,0,320,256,0,0,0,BACKDROP |BORDERLESSI : 
struct Window "window, *OpenWindow(); 

struct Lock "lock; 

struct FileInfoBlock *fib; 


long REV[2]=10,331; 
long YA[]=1187L,243L1; 
long YAl[]=I186L,2421; 


int titelbildtiefe,kick,trainer: 
UWORD *colorp,color[40) ‚dunkelcolors[32] ‚dummycolors[32] ,titelcolors[32]; 
UWORD colorhi[HIAC]=[ 0x000,0xd4d4,0x280,0x08f |; 


UWORD colori [AC] =I 0x000,0x579,0x5ae,0x53a, 
Oxcb6,Oxddf,Oxtff,0x666, 
0x000,Ox£ff,0x888,0xa60, 
0xb00,0x841,0x045,0x080 |; 


UWORD color2 [AC] =I 0x000,0x579,0x5ae,0x53a, 
Oxcb6 ,Oxddf,Oxfff,0x666, 
0x000,0x883,0x0af,0xa60, 
0xb00,0x841,0x045,0x080 I; 


UWORD color [40] =I 0x000,0x579,0x5ae,0x5Ja, 
Oxcb6 ,Oxddf,Oxfff,0x666 I; 


main(arge,argv) 

int arge; 

char *argvl); 

/* Programm-Anfang 

CLI-Parameter dekodieren, Libraries eroeffnen, Bilder und Sounds laden, 
Speicherplatz reservieren (in Form von Bitmaps), Dual-Playfield-view 
einschalten und Sprung ins Hauptmenu */ 


' 
int 4; 


iflarge==0) 
exit(il); 

else iflargc=-1 || (arge?i && *argvlili='1' && *argvlili='2') 11 

(argc)2 && *argvl2]i='t") ) | 
print£("Syntax: %s «version? <trainer>\n",argv[0]):; 
printf£("<version’: '1' oder '2', fuer Kickstart Version 1.1 oder 1.2\ 

\n<trainer>: 't', nur angeben, wenn Trainer erwuenscht.\n"); 

exit(iL); 

l 


else | 
if(*argviije='2') 
kick=1; 


1 
ifl(argc>2) 
trainer=1; 
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if((IntuitionBase= (struct Intuitiondase *}OpenLibrary("intuition.library", 
REV[kick]))==0) | 
printf ("Falsche Kickstart-Diskette! Version 1.2 wird benoetigt.\n"); 
closeall(0); 


l 

if((GfxBase = (struct GfxBase *)OpenLibrary("graphics.library",OL))==0) | 
printf("Eroeffnen von Graphies-Library erfolglos!\n"); 
closeall(0); 


ı 
/* Window oeffnen und wieder schliessen, um zu testen, ob erweiterte 
vertikale Aufloesung (256 Pixels) wirklich nutzbar ist. Manchmal 
ii re a unter Kicki.2 kein Window ueber 200 Zeilen ausdehnen. */ 
£ .<) . 
newwindow. Type=WBENCHSCREEN; 
if (window=OpenWindow (änewwindow) )==0) I 
printf("Fehler im Amiga-Betriebssytem aufgetreten. \n\ 
Bitte Amiga mit Ctrl-A-A ruecksetzen!\n"); 
eloseall(0); 
I 


CloseWindow (window) ; 
titelbildladen(); 
#ifdef SOUND_ON 
salloc(); 
titelsladen(); 
#endif !SOUND_ON 


#ifdef DISKFONT_ON 
e = (struct Library *)OpenLibrary("diskfont.library”,OL)) 


printf("libs:diskfont.library fehlt!\n"); 
eloseall(0); 


1 
if((font=OpenDiskFont (ätextattr))==0) I 
#endif !DISKFONT_ON 


#ifndef DISKFONT_ON 
ifl(£font=Openfontlätextattr))==0) | 
#endif !DISKFONT_ON 


printf("Kann den Zeichensatz nicht eroeffnen!\n"); 
eloseall(0); 

j 

allocmem(); 

laden (); 


#ifdef SOUND_ON 
for (i=0;i<ANZSOUNDS-1;i++) 
soundladen(i); 
Wendif !SOUND_ON 


/* Titelsound nicht mehr laden */ 


titelsstop(); 


allocbitmap(&bm, 3L.XA+2*VX,YAlkick]+2*VY) ; 
allocbitmap(&bm2, 3L,XA+2*VX, YAlkick]+2*VY) ; 
allocbitmap (&bunkerbuff[0] ,3L,XA,BKO4); 
allocbitmap(&bunkerbuff [1]. 3L,XA I: 
allocbitmap (&dummyb, DUMMYT , DUMMYX , DUMMYY) ; 


Forbid(); 


old=GfxBase->Actiview; 
Initview(äv); InitVPort(&vp); InitVPortiävphi); 


v.ViewPort=&vphi; vphi.Next=ävp; 

v.DyOffset=old->DyOffset; v.DxOffset=old->Dxüffset; 
vphi.ColorMap=scmhi; vphi.RasInfo=s&rihi; vphi.DWidth=HIXA; 
vphi.DHeight=HIYA; vphi.Modes=HIRES; 

vp.ColorMap=cm; vp.RasInfo=&ri; vp.DWidth=XA; vp.DHeight=YAlkick]; 
vp.Modes=DUALPF; vp.DyOffset=BLELINE+HIYA: 


rihi.BitMap=£&bmhi; 
ri.BitMap=äbm; ri2.BitMap=&bn2; 

ri.RyOffset=Vy; ri2.RyOffset=VvY; 

ri.Rxoffset=VxX; ri2.Rxöffset=vX; 

ri.Next=&ri2; 

InitRastPort (&rphi); 

rphi.BitMap=&bmhi; 


InitRastPort(&rp); InitRastPort (&rp2); | 
SetDrMd(ärp,JAM1); SetDrMd(&rp2,JAMl): | 
rp.BitMap=&bn; rp2.BitMap=&bn2; 


MakeVPort (&v,&vphi): 

MakeVPort (&v,&vp); 

Mrgcop(&v); 

SetRast(&rp,OL); SetRast(&rp2,0L); SetRast(&rphi,0L); SetAPen(&rphi,iL): 
SetBPen(&rphi,0L); SetDrMdlä&rphi,JAM2); SetFont(&rphi, font); 
SetFont(&rp, font); SetFont(ä&rp2, font); 

LoadRGB4 (ävp,dunkelcolors, (long)AC); 

LoadRGB4 (&vphi ‚dunkelcolors, (long)HIAC); 

Loadviewiäv); 

syne(); syne(); 

ON_DISPLAY 


anfang(); 


Pernit(); 

LoadView(old); 

WaitTor(); 

ON_SPRITE 

hisave(); 

FreeVPortCopLists(&vp); FreeVPortCopLists/ävphi); 

FreecprList(v.LOfCprList) ; 
eloseall(0); 


ı 
titelsstop() 


/* Titelbild und Titelsound sanft ausblenden, Speicher zurueckgeben, 
Screen schliessen */ 


j 
int 1,3; 
UWORD zcol; 


Lor(j=0;jt16;j++) I 
syne(): 


#ifdef SOUND_ON 
soundvol (16,60-j 
soundvol (16,60-j* 

#endif !SOUND_ON 


3; 
4; 


syne(); 
tor(i=0; i < 1e<titelbildtiefe ;i++) I 
zcol=*((UWORD *)screen->ViewPort.ColorMap->ColorTable+i); 
if (zco1l&0x£00) 
zeol-=0x100; 
if(zcol&0x0f0) 


X SLISTING 


zcol-=0x010; 
it (zcol&0x00f) 
zcol-=0x001; 


SetR6B4 (kscreen->ViewPort, (long)i, (long) zc01/256, (long) (zeol/is)816, 


(long) zcolN16); 
I 


#ifdef SOUND_ON 
if(sdata[l16].name) | 


FLUSH; 
3 


ioa[4]->ioa_Requ 
BeginIo(ioa[3)); 
BeginIolioa[4)); 
Delay{30L); 

FreeMen(sdata[16).buffer ,sdata[16).ien); sdata[16).buffer=0; 


j 
#endif !SOUND_ON 


CloseScreen(screen); screen=0; 
OFF_DISPLAY 
l 


soundvol (which, vol,channel) 
int which, vol,channel; 


/* Lautstaerke eines gerade ertoenenden Klangs veraendern 
which = Soundfilenummer 0...ANZSOUNDS-1 
vol = Lautstaerke 0...64 
channel = Kanalnummer 1...4 %/ 


1 
#ifdef SOUND_ON 
if(sdata[which].name) | 

ioa[channel]->ioa_Request..io_Command=ADCMD_PERVOL; 
ioa[channel]->ioa_Request.io_Flags=IOF_QUICK; 
ioa[channel]->ioa_Period=(UWORD) (lint)sdata[which]..period); 
ioa[channel]->ioa_Volume=vol; 
BeginIO(ioalchannel]); 


I 
#endif !SOUND_ON 

’ . 
j 


sound (which, deltaf,channel) 
int which,deltaf,channel; 


/* Bestimmten Sound abspielen 
which = Soundfilenummer 0...ANZSOUNDS-1 
deltaf = Abweichung von 
vordef. Period 
je nach Period 
channel = Kanalnummer 1...4 ef 


l 
#ifdef SOUND_ON 
if(sdata[which].name && demo==0) | 
ioa[channel]->ioa_Request.io_Command=CHD_FLUSH; 
ioa[channel]->ioa_Request.io_Flags=IOF_QUICK; 
BeginIO(ioa[channel]); 
ioa[channel]->ioa Request.io_Command=CMD_WRITE; 
ioa[channel]->ioa Request.io_Flags=ADIOF_PERVOL!IOF_QUICK; 
ioa[channel]->ioa Data=sdata [which] „buffer; 
if((int)sdata[which] „period+deltaf«90) 
ioalchannel]->ioa_Period=90; 
else 
ioa[channel]->ioa_Period=(UWORD) ((int)sdata [which] ‚period+deltaf); 
ioalchannel]->ioa_Cycles=sdata [which] .cycles; 
ioa[channel]->ioa_Length=sdata [which] .len; 
ioa[channel]->ioa_Volume=sdata [which] .volume; 
BeginIOlioalchannel]); 


| 
#endif !SOUND_ON 
’ 
ı 
laden() 


/* IFF-Bilder (fuer Animation der Invaders,Schuesse...) laden, in 
die dafuer vorgesehenen Bitmaps kopieren und Highscore-Tabelle laden 
bzw., wenn nicht vorhanden, initialisieren. */ 


U 
int i,j,k; 


getiff("ic.data:lo-res/about" ‚Kiff,&color3[8]); 
BltBitMap(&iff,OL,OL,&ab1,0L,OL,ABOUTWIDTH ,ABOUTHEIGHT, OxcOL,7L); 
freebitmap(äiff); 
getiff("ic.data:lo-res/invaderi",&iff,color); 
BltBitMap(&iff,OL,OL,&inb,OL,OL,320L, INY+PHASEN, OxcOL,0x7L); 
freebitmap(&iff); 
getiff("ic.data:lo-res/invader2" ,&iff dummycolors); 
BltBitMap(&iff,0L,OL,&inb, 320L,0L,320L,INY*PHASEN, OxcOL,0x7L) ; 
freebitmap(&iff); 
getiff("ic.data:lo-res/invader3" ‚Giff dummycolors) ; 
BltBitMap(kiff,OL,OL,&inb, 640L,0L,320L, INY*PHASEN, OxcOL,Ox7L); 
freebitmap(&iff); 
getiff("ic.data:lo-res/schuss" ‚&iff,&color[8]); 
BltBitMap(kiff,OL,OL,&schb,OL,OL,SCHWIDTH, SCHHEIGHT*SCHPHASEN, OxcOL,Ox7L) ; 
freebitmap(&iff); 
getiff ("ic.data:lo-res/missile" ‚Kiff ‚dummycolors) ; 
BltBitMap(Siff,OL,OL,&misb,OL,OL,MISWIDTH, MISHEIGHT+MISPHASEN, OxcOL,Ox7L) ; 
freebitmap(&iff); 
getiff("ic.data:lo-res/explosion" ,‚Kiff ‚dummycolors) ; 
BitBitMap(&iff,OL,OL,&expb,OL,OL,EXPWIDTH, EXPHEIGHT*EXPPHASEN, OxcOL,Ox7L) ; 
freebitnap(siff); 
getiff ("ic.data:lo-res/bunker" ,‚Kiff dummycolors); 
BltBitMap(&iff,0L,OL,&bunb, OL,OL,BWIDTH, BHEIGHT, Oxc0L,Ox7L); 
freebitmap(kiff); 
getiff ("ic.data:lo-res/bunkertreffers” ‚Kiff dummycolors); 
BiltBitMap(&iff,OL,OL,&bssb,OL,OL,BSSWIDTH, BSSHEIGHT, OxcOL,OxiL); 
freebitmap(&iff); 
getiff("ic.data:lo-res/bunkertrefferi" ‚Kiff,dummycolors); 
BitBitMap (&iff,0L,OL,&bsib,OL,OL,BSIWIDTH, BSIHEIGHT,, OxcOL,OxiL) ; 
freebitmap(&iff); 
getiff("ic.data:lo-res/nissiletreffer" ,Kiff dummycolors); 
BitBitMap(&iff,0L,0L,&mistreb, OL,OL,MTWIDTH,MTHEIGHT, OxcOL, Ox7L) ; 
freebitmap(&kiff); 
getiff("ic.data:lo-res/mutterschiff" ,Kiff,dummycolors); 
BltBitMap(&iff,OL,OL,&mutb, OL, OL,MUTWIDTH*MUTANZ, 

MUTHEIGHT* (MUTPHASEN+MUTEXPPHASEN) ‚OxcOL,Ox7L) ; 
freebitmap(&iff); 


for (k=0;k<MAXVERSIONS;k++) 
for (i=0;i1<SLOTS;i++) 
tor (j=0;j<8;j++) 
slots[k] [i] .wholj]='-'; 


RE BENETER WER SEN, 


if ((£h=Open ("ic.datarhighscores" ‚MODE_OLDFILE))==0) | 


return(); 


1 
if(Read(fh,slots, (long)sizeof (slots)) Imsizeof (slots)) I 


printf("Lesefehler in Datei ic.data:highscores (kein Problem!).\n"); 


for (k=0;k<MAXVERSIONS;k++) 
tor(im0;icsLotTs;i++) I 
Zor (j=0;jc8;j++) 
slots[k] [1] .wholjj='-"; 
slots[k] [i].score=0; 


1 
Close(fh); £h=0; 


hisave() 
/* Highscore-Tabelle abspeichern */ 


if((fh=Open("ic.data:highscores” ‚MODE_NENFILE))==NULL) I 
parat a nr recge wurden nicht abgespeichert. \n"); 
return(); 


1 
if(Write(fh,slots, (long)sizeof (slots) } !=sizeof (slots)) I 
printf("Schreibfehler in Datei ic.datachighscores !\n"); 


Close (fh); fh=0; 
returni); 


allocmen() 


/* Bitmaps und Colormaps bereitstellen */ 


t 


allocbitmap(&bssb,1L,BSSWIDTH, BSSHEIGHT) ; 
allocbitmap(&bsib, 1L, BSIWIDTR,BSIHEIGHT) ; 
allocbitmap(&inb, INT,INX,INY*PHASEN) ; 
allocbitmap (äschb, SCHT, SCHWIDTH, SCHHEIGHT*SCHPHASEN) ; 
allocbitmap (&misb,MIST,MISWIDTH ‚MISHEIGHT*MISPHASEN) ; 
allocbitmap(&expb, EXPT, EXPWIDTH, EXPHEIGHT* (EXPPHASEN+1)) ; 
allocbitmap (&bunb, BT, BWIDTH,BHEIGHT) ; 
allocbitmap(ämistreb,MTT,MTWIDTH,MTHEIGHT) : 
allocbitmap (&mutb, MUTT,MUTWIDTH*MUTANZ , MUTHEIGHT* (MUTEXPPHASEN+1+ 
MUTPHASEN)) ; 
allocbitmap(&bmhi,HIT,HIXA,HIYA); 
allocbitmap(&ab1,3L,320L,38L); 
if(lem=GetColorMap((long)AC))==0) I 
printf("GetcolorMap() erfolglos...\n"): 
eloseall(1): 


1 

if ((cmhi=GetColorHap( (long)HIAC))==0) | 
printf ("GetcolorMap() erfolglos...\n"); 
eloseall(1); 


titelbildladen() 


/* Titelbild laden; Format: 320x200 oder 320x256 max. 32 Farben */ 


UWORD zcol; 

int 3,4: 
getiff("ic.data:lo-res/titelbild",&iff,titelcolors); 
titelbildti ift. th: 


it( iff.Byt rRow!=40 || (iff.Rows!=200 && iff.Rowsi=256) ) I 
printf("Titelbild hat falsches Format\n"); 
eloseall(0); 

ı 


ifi(kick) 
newscreen.Height=256; 
else 
newscreen.Height=200; 
newscreen.Depth=etitelbildtiefe: 
if((screen=OpenScreen (änewscreen))==0) | 
printf ("OpenScreen() erfolglos!\n"); 
eloseall(0); 


LoadRGB4 (&screen->ViewPort ‚dunkelcolors,ILt<titelbildtiefe); 
SetRast (äscreen->RastPort,OL); 
ifikick)i 
if(iff.Rows==256) 
BltBitMap(&iff,OL,OL,&screen->BitMap,OL,OL,320L, 256L, 
OxcOL,Oxf£L); 
“lse 
BltBitMap(&iff,OL,OL,&screen->BitMap,OL,28L, 320L,200L, 
; OxcOL,Oxf£L); 
e.ise | 
if liff.Rows==256) 
BltBitMap(siff,0OL,28L,&screen->BitMap,OL,OL,320L,200L, 
OxcOL,OxtfL); 
else 
BltBitMap(&iff,0L,OL,&screen->BitMap,OL,OL,320L, 200L, 
f OxcOL,OxffL); 
freebitmap(siff); 
for (j=0;j<15;:Jj++) I 
syne(); 
tor(i=0; 4 < ic<titelbildtiefe ;i++) I 
zcol=*((UWORD *)screen->ViewPort.ColorMap->ColorTable+i); 
if(tzco1&0x£00) < (titelcolors[i]&0x£00)) 
zcol+=0x100; 
if((zcol&0x0f0) € (titelcolors[i]&0x0£0)) 
zcol+=0x010; 
if((2c01&0x00f) < (titeicolors[i]&0xoof)) 
zcol+=0x001; 
SetRGB4 (äscreen->ViewPort, (long)i, (long)zcol/256, 
(long) (zcol/16) 816, (long) zeolki6); 


clöseall (fehler) 
int fehler; 


/* Alle reservierten Speicherstuecke und Bitnaps freigeben, Fonts, 
Libraries,usw. schliessen */ 


int i; 


ON_DISPLAY 

sifdef SOUND_ON 

frees(); 

tor (i=0;icANZSOUNDS; i++) 
if(sdatali).buffer) 
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FreeMen(sdata[i).buffer,sdatali].len); 

it llock) 

UnLock lock] 
if£t£ib) 

FreeMenm(fib, (long)sizeof(struct FileInfoBlock)); 

#endif !SOUND_ON 

E3 253.9) 

Closelfh): 
iftfont) 

Closefont (font); 
ificmhi) 

FreeColorMap(cmhi); 
ificm) 

FreeColorMap(ca); 
freebitmapt&iff); 
freebitmap|&mutb) ; 
freebitmap(&bunb) ; 


freebitmap(&kabl); freebitmap(&bmhi); 


InvaderCraft von J.Hertei 
(C) CW-Publikationen 


"lader.c" 


Kompilieren mit Aztec C Version 3.20a. 


Aufruf: cc lader -a 
as lader 


Linken: siehe invadercraft.c 
“ 


#include <libraries/dos.h> 
#include <graphics/gfx.h> 
#include <exec/memory.h> 


extern struct GfxBase *Gfxbase; 
extern long Read(); 


struct FileHandle *fpointer, *Open(); 

char "AllocMenm(),*buffer; 

char *ifferrord[4)=|"ist nicht vorhanden!" ,"ist keine IFF-Datei!”, 
"fehlerhaft!","ist keine Grafik-Datei!"]; 


struct chunk I 
char name{4]; 
ULONG len; 

I £orn, *chunk: 


struct bmhd | 
WORD width,height,xpos,ypos; 
UBYTE planes,mask,comp,pad; 
WORD trans; 
BYTE xasp,yaapı 
WORD pw,ph; 

I *bnhd; 


struct cmap | 
UBYTE rob[321 [3]; 
I *omapı 


getiffiname,b,c) 
char *name; 
struct BitMap *b; 
UWORD el}: 


/* Laden eines IFF-Bilds von Diskette 

name Zeiger auf Dateiname 

b Zeiger auf eine uninitialisierte Bitmap-Struktur 
e Zeiger auf ein uninitialisiertes Array von UWORDs 


Mit dieser Funktion wird eine Bitmap mit den Ausmassen und der Grafik des 


IFF-Bilds, oder IFF-Pinsels, bereitgestellt. In das Array c[] werden die 


Farben uebertragen (Format wie in Color-Table: Oxrgb). Die Anzahl an UWORDs 


muss groesser oder gleich der Anzahl an Farben sein. */ 


' 
ULONG index; 
int n.i,j.k,2; 
BYTE *body, *plane; 
LONG yversatz=0; 


if! (£pointer=Open (name ,MODE_OLDFILE) )==0) 
iffend(name,0); 
if(Read(£fpointer, &form,8L) !=8L) 
iffendiname,1); 
if (cmp("FORM",‚form.name)) 
iffend(name,1); 
if((buffer=AllocMem(form.len,MEMF_PUBLIC) )==0) 
iffend(name,-1); 5 
if(Read(fpointer ‚buffer, form.len) !=form.len) 
iffend(name,2); 
index=0; 
if (cmp("ILBM".buffer+index)) 
iffend(name,3); 
index+=4; chunk=(struct chunk *) (buffer+index); 
if(emp(*BMHD" ‚chunk->name)) 
iffend(name,2); 
index+=8; bmhd=(struct bmhd *) (buffer+index) ; 
allocbitmap(b, (long)bmhd->planes, (long) bmhd->width, (long)bmhd->height); 
index+=chunk->len; index+=indext2; 
ehunk=(struct chunk *) (buffer+index) ; 
while (emp("CMAP",chunk)) I 
index+=chunk->ien+8; index+=indext2; 
chunk= (struct chunk *) (buffer+index) ; 
iflindex>form.ien-8) 
' iffend(name,2); 
index+=3; cmap=(atruct cmap *) (buffer+index); 
for (i=0;icchunk->len/3;i++) I 
e[i]=(UWORD)cmap->rgb[i] [OJ<<&! (UWORD)cmap->rgbli] [1]! 
{UWORD) cmap->rgbl[i) [2]>>4; 


ı 
index+schunk->len; index+=indexk2; 
chunk=|struct chunk *) (buffer+index) ; 
while(cmp("BODY",‚chunk)) I 
index+=chunk->len+8; index+=indexs2; 
chunk=(struct chunk *) (buffer+index}); 
if(index>form.ien-8} 
iffend(name,2); 


I 
"index+=8; body=buffer+index: 
if (chunk->len==0) 
iffend(name,2); 


freebitmap(&mistreb); freebitmap(&dummyb) ; 
freebitmapi&expb) ; freebitmaplämisb); 


freebitmapl(äschb); freebitmap(äbm); freebitmap(&bm2); 
treebitmap(&inb); freebitmap(&bsab); freebitmap(äbsib)r 
freebitmap(&bunkerbuff[1]); freebitmap(äbunkerbuff[0]); 
if(screen) 

CloseScreen (screen); 


#ifdef DISKFONT_ON 
if(DiskfontBase) 
CloseLibrary(DiskfontBase); 


#endif !DISKFONT_ON 
if (GfxBase) 
CloseLibrary(GfxBase); 
if(IntuitionBase) 
CloseLibrary(IntuitionBase); 
if(£ehler) 
printf("Zu wenig Speicherplatz!\n"); 
exit(0); 


if(bmhd->comp) I 
/* Dekonmprimieren */ 
forti=0;icbmhä->height;i++) I 
for(j=0;j<bahd->planes;j++) | 
plane=(BYTE *)b->Planes[j]+yversatz; 
z=0; 
while(zcb->BytesPerkow) | 
n=*body++; 
ifinco) I 
for (k=O;ki-n;k++) 
“plane++=*body; 
“plane++m*body++; 
z++; 


I 
else | 
for (k=0;kın+1;k++) 
*“plane++=*body++; 
ı 
z+t=k; 
8 
l 
yversatz+=b->BytesPerRow: 


ı 
eise | 
/* Unkomprimierte Daten */ 
tor (i=0;i<cbmhd->height;i++) I 
for (j=0; jcbmhä->planes;j++) I 
plane=(BYTE *)b->Planes[j)+yversatz; 
for ik=0;ktb->BytesPerRow;k++) I 
*"plane++=*body++; 
’ 
ı 
yversatz+=b-)BytesPerRow; 


ı 
iffend(name,-2); 


emp(si,s2) 
char *s1,*52; 
(ie Vergleich zweier Chunk-Namen, enmp{)==1, wenn ungleich */ 


if(tsli=*s2 || "(sirl)imm(s2+1) 11 *(s1+2)imr{s2+2) 11 “islr3)t=*(52+3)) 


return(1); 
else 
zeturn(0); 
! 


iffend(name,fehler) 
char *name; 

int fehler; 

/* Alles wieder dem Systen zurueckgeben und evtl. Ausdrucken einer Fehler- 
meldung */ 


j 
if(£pointer) 
Close (fpointer):; 
if(buffer) | 
FreeMen(buffer,form.len); 
buffer=0; 


’ 
iftfehler=-=--2) 
return(); 
else if(fehler==-1) 
elosealili); 
else | 
printf ("Datei %s %s\n",name,ifferrord[fehler]); 
eloseall(0); 


allocbitmap/b,t 
struct BitMap * 
long t,w,h; 


/* Bitmap initialisieren und entsprechend Speicher anfordern 


‚h) 


b Zeiger auf uninitialisierte Bitmap-Struktur 
v Tiefe (Anzahl an Bitplanes) Anzahl Farben = 2 * t 
” Breite 
h Hoehe “ 
t > 
int iz 
InitBitMap(b,t,w,h): 
forli=o;ict;is+) I 
if ((b->Planes[i]=(PLANEPTR)AllocMem{ (long)RASSIZE(w,h), 
MEMF_CHIPIMEMF_CLEAR) )==0) 
elosealli1}; 
I 
' 
freebitmap(b) 


struct BitMap *b; 
/* Speicher fuer Bitmap freigeben, b ist Zeiger auf Bitmap-Struktur */ 


t 
int i; 


£or(i=0;i<b->Depth;i++) 
i£(b->Planes{i}) I 
FreeMem(b->Planes[i], (long)RASSIZE(8L*b->BytesPerRow, 
(long)b->Rows)); 
b->Planes[ij=0; 


| 
| 
| 
| 
| 


nn 


I» 


InvaderCraft von J.Hertel 
tc) CW-Publikationen 


"Benu.c" 


Konmpilieren mit Aztec C Version 3.20a. 
Im Include-Directory muss sich das Header-File "invadercrafti.h" befinden! 


Aufruf: cc menu -a 
as menu 


Linken: siehe invadercraft.c 
Br 


#include <exec/types.h> 
Winclude <exec/interrupts.h> 
#include <graphics/gfx.h> 
#include <graphics/view.h> 
#include <graphics/rastport.h> 
#include <graphics/gfxmacros.h> 
#include thardware/intbits.h> 
#include <hardware/dmabits.h> 
#include <hardware/custom.h> 
#include 


/* Vor Compiler-Aufruf unbedingt "invadercrafti.h" in include/ - Directory 
kopieren! */ 


Winclude <invadercrafti.h> 


extern char *versstr[]; 

extern int _Dorg,player,anzplay,ship[], version,demo,kick; 
extern struct Custom *custom; 

extern struct CIA "ciaa; 

extern struct RastPort rp,rp2; 

extern struct ViewPort vp,vphi: 

extern struct BitMap bm,bm2, abi; 

extern UWORD colorhil],coloril],color2[],color3l]: 
extern long YAl]; 


long MITTE[]=187,1101; 
struct Interrupt VertBIntr; 
struct liste slots[MAXVERSIONS] [SLOTS] ; 


#define ANZSTRI 6 
char *textstr[ANZSTRI]=| 
"Choose Version", 


/* Hauptmenu */ 


Mdefine ANZSTRI 7 
char *aboutstr[ANZSTR3]=| 
"Invadercraft", 
"written by", 
"I. Hertel“, 
"Version 2.0", 
"Copyright", 
"1987 by", 
leder nen 
B 


/* About */ 


#define ANZSTERN 35 
UBYTE vstern[ANZSTERN] ; 
USHORT xstern[ANZSTERN) ‚ystern[ANZSTERN] ; 


long zufall=523476729; 
USHORT rend} 


VertBServer() 
x Interface zwischen C-Code und Interrupt-Handler */ 


#asn 
movem.1l d2-47/a2-a4,-(sp) 
move.i al,as 
tendasm 
hinter(); 
#asn 
NOVEQ.L #0,D0 
moven.1l (sp)+,d2-47/a2-ad 
Ben 


/* zufallszahler-Routine, Aufruf: rndi(), Resultat in rnd */ 


#asn 
cseg 

„endi: 
public _rndi 
moven.1 dO-d3,-(ap) 
nove.l _zufall,do 
move.w 17,43 

label: 
move.b dO,diı 
move.b dO,d2 
lsr.b #3,dı 

“ lsr.b #1,d2 
“or.b di,d2 
isr.b #1,42 
roxr.1 #1,d0 
move.i do, zufall 
dbra d3,label 
move.w dO,_rnd 
novem.1 (sp}+,d0-43 


interein() 
/* Vertical-Blank-Interrupt einschalten fuer die Bewegung der Sterne im 
Aunearorund % 


VertBIntr.is_Node.in_Type=NT_INTERRUPT; 
VertöIntr.is_Node.In_Pri=-60; 
Vertdintr.is_Node.In_Name="InvaderCraft!"”; 
VertBintr.is_Data=(APTR) ((BYTE *)&_Dorg+32766); 
VertBIntr.is_Code= (void {*}())VertBServer; 


' AddintServer (INTB_VERTB ‚&VertBintr); 


interaus() 


ur Be Se en 1 > ee a U a a | 


IoTINt 


di Ausschalten des Vertical-Blank-Interrupts */ 
RemIntServer (INTB_VERTB,äVertBIntr); 


hauptmenu() 


/* Hauptmenue (Choose Version/One Player Game/Two Player Game/Hall of Fame/ 
About/Exit) anzeigen, Joystick abfragen und entsprechende Routinen 
aufrufen */ 


int i,item=1; 


ao | 
player=0; anzplay=1; ship[0]=0: ship[1]=0; 
titrest(); 
syne(); 
iflitem==1| item==2) 
demorot(); 
SetRast (&rp2,0L); SetRast (&rp,OL); 
auswahlanz(0,1,ANZSTRl,textstr[0]); 
tor (d=1;i<ANZSTRI;i+*+) 
auswahlanz (1,3, ANZSTRi,textstr[i]); 
interein(); 
iflitem=»2; litem-=1) | 
sound (15,0,3}: 
sound (15,0,4); 
einblenden (color1,1); 


el 


nblenden (color1,0); 


ite: 
do | 
torlimosiessier) I 
synet); 
SetRGB4l&vp,10L, (long) (185+3) , (long) (Ld+I3)n9+6), 
(long) (li+6)86+5)); 
I 


auswahlanz (item, 3,ANZSTRl,textstrlitenm)); 
if((custom->joyldat>>i1 * custom->joyidat)&l) 
item= (item+1)%6; 
else ifl(custom->joyldat>>1 ” custom->joyldat)&0x100) 
items (item+5) 86; 
auswahlanzlitem,1,ANZSTRI ,textstr[litem]) 


| whilelciaa->ciapra&0x80); 
while ((ciaa->ciapras0xsü)==0) ; 


iflitem==1| liteme=2) | 
ausblenden (1); 
interaus(); 
spiellitem-1); 


/* One/Two Player Game */ 


I 

else ifliten==3) | 
ausblenden (0); 
interaus(): 
showhi() 
while (ci >eiaprasox80); 
while ((ciaa->ciapra&ox80)==0) ; 
ausblenden (0); 
interaus(); 


/* Hall of Fame */ 


l 

else if(item-=0) 
otherversion(); 

else iflitem==4) | 
ausblenden (0); 
abouti(); 
einblenden (color3,0): 
while (ciaa->ciapra&0x80); 
while (( a->ciaprasöxd0ü)==0); 
ausblenden(0}; 
about(); 
einblenden (color1,0); 
while (ciaa->ciapra&0x80); 
while ((ciaa->ciaprasoxsoü)m=0); 
ausblenden (0); 
interaus(); 


/* Choose Version */ 


/* About */ 


! 

else | 
ausblenden (1); 
interaus(); 


In Exit ®/ 
j 
I whilelitemi=5); 


otherversion() 


/* Menue zur Auswahl der verschiedenen Versionen anzeigen und gewuenschte 
Version einschalten */ 


I 
int i; 


ausblenden (0); 
SetRast (&rp2,0L); 
auswahlanz (version, 1,MAXVERSIONS, versstr [version] ); 
£or(i=m0;i<MAXVERSIONS;i++) I 
if(i1=version) 
auswahlanz (1,3, MAXVERSIONS  versstr[i]); 


einblenden (colori1,0); 
do | 
tor limo;ics;ier) | 
syne(); 
SetRGB4 (&vp,10L, (long) (i85+5) , (long) ( (i+3)45+6) , (Long) (Li+6) 8645); 


auswahlanz (version, 3,MAXVERSIONS, versstr [version] ); 
if((custom->joyldat>>i1 ” custom->joyldat)&i) 
version= (version+1)NMAXVERSIONS; 
else if((custom->joyldat>>1 * custom->joyldat)&0x100) 
version«= (version+MAXVERSIONS-1) 8MAXVERSIONS; 


Oktober/87 um 57 


>» 


auswahlanz (version, 1,MAXVERSIONS ‚versstr[version]]; 


I whilelciaa->ciapra&ox80); 
while ((ciaa->ciapras0xs0)==0); 
ausblenden (0); 5 
interaus(); 


demorot (} 


/* 


Demo-Modus - Computer spielt nun Invadercraft bis Joystick-Knopf (oder 


ausnahmsweise linke Maustaste) betaetigt wird */ 


int demozeiger=0,flg=1; 


SetRast(&rp,OL); SetRast (&rp2,0L); 
sound (15,0,3); 
sound (15,0,4); 
demo=1; 
forl;jdemozeiger= (demozeiger+1)*4) | 
/* Auswahl aller Hauptmenuepunkte */ 
switch (demozeiger) [ 
case 0: 


’ 


interein(); 

abouti(); 

einblenden (cölor3,£lg}; 

if(sieep()) I 
ausblenden (1); 
interaus(); 
goto enddemol; 


einblenden (color1,0): 
if(sleep()) I 
ausblenden (1); 
interaus(); 
goto enddemol; 


ausblenden (0); 
interaus(); 
showhi(); 
ifisleep(}) I 
ausblenden(1); 
interaus(); 
goto enddemol; 


ausblenden (0); 
interaus(); 
break; 
case 3: 
SetRast(&rp,OL); SetRast(&rp2,0L); 
SetAPen(krp,OL); SetAPen(&rp2,0L); 
if(spiel(0)) 
goto enddemo; 
SetRast (ärp,OL); 
break; 


enddeno: 


ausblenden(1}; 


enddemol: 


demo=0; 


sleep() 


I" 
' 


Joystick und linke Maustaste abfragen; wenn gedrueckt, dann sleep()="1 */ 


int i; 


tor (i=0;16300;i++) | 
syne(); 
if((ciaa->ciaprasox80)==0) | 
while ((ciaa->ciapra&0x80)==0); 
return(1); 


ifl(ciaa->ciaprasöx40)==0) | 
while ((ciaa->ciapran0xs0)==0); 
return(1); 


I 
return (0); 


about () 


/* 
t 


I 


Copyright-Hinweis und Name des Programmierers zeigen */ 


int 1,3: 


SetRast(&rp2,0L); 
tor (i=O;i<ANZSTRI;I++) | 
auswahlanz (4,1, ANZSTR3,aboutstr[i]); 


abouti() 


/* 
I 


! 


IPF-Brush ("ic.data:about") mit dem Titel des Programms anzeigen */ 


SetRast (&rp2,0L); 
BitBitMap (Kabl,OL,OL,&bm2, VX, VY+MITTE[kick]-ABOUTHEIGHT/2, ABOUTWIDTH, 
ABOUTHEIGHT,OxcOL, Ox£f£L); r 


hinter (} 


I 
j 


Sterne im Hintergrund bewegen (einfach, da Dual-Playfield) */ 


int addri,i; 
long addr; 
BYTE xz; 


OFF_SPRITE 
for (imO;icANZSTERN;i++) | 
if(xsternli]< vx-1) I 

xstern[i]=XA+VX; 


addr=ystern[i]*bm.BytesPerRow; addri=xstern[i]>>3; 


iftisi) 
*(bm.Planes[0]+addr+addr1)=0; 
it (i&2) 
*(bm.Planes[1]+addr+taddr1)=0; 
if (184) 
*(bm.Planes[2]+addr+addr1)=0; 
xstern[i]-=vstern[i]; addri=xstern[i]>>); x2=128>> (xstern[i]&7); 


4f(isl) /* Einfaerben der Sterne */ 
*“(bm.Planes[0]+adädr+addri)=xz; 
iftia2) 
*(bm.Planes [l1]+addr+addrl)=xz; 
it(i&4) 
*(bm.Planes[2]+addr+addri)wxz; 


j 


sternsetz() 


/* Stern-Koordinaten und Geschwindigkeiten festsetzen */ 


int 4; 


forti=0;i<ANZSTERN:i++) I 
zndi(); 
ystern[i]=(long)YAlkick] * (long) rnd/0x10000L4VY; 
rendi(); 
vstern[i]=10L* (long)rnd/0x10000L+1: 
endi(); 
xstern[i]=(long)XA* (long) rnd/0x10000L+VX; 


\ 

auswahlanz (i,j,anzstring, string) 
int i,j,anzstring; 

char *string; 


/* Zeile zweifarbigen Textes anzeigen (automatisch zentrierend) 
i Zeilennummer ( Zeilenhoehe = 20 Pixels ) 


3 Farbe (bzw.j+1) 
anzstring Anzahl an Zeilen insgesamt (fuer Zentrierung) 
string Zeiger auf auszudruckenden String */ 


SetAPen(&rp2, (long)j); 

Move (&rp2,XA/2+VX-5L*strlen (string) ‚VY+MITTE[kick]+6L+20L*1- 
anzstring*10L+5L); 

Text (&rp2,string, (long)strlen(string)); 
SetAPen(ärp2, (long) j+iL); 

Move (&rp2,XA/2+VX-SL*strlen(string)+1L,VY+MITTE[kick]+6L+20L*i- 
anzstring*10L+5L); 

Text (&rp2,string, (long)strlen(string)}: 

j} E 


showhi () 
/* Highscore-Tabelle zeigen */ 


! 
int i,y; 
char str[6]; 
ULONG z; 


SetRast (&rp,OL); SetRast(&rp2,0L): 
£or(y=0;y<SLoTs;y++) I 
tor (im0;ic6;i++) 
str[i]=' '; 
z=slots[version] [y] .score; 
for (i=5;i>=0;i--) 
str[i]= z 8 10 + 48; 
2/=10; 
it (z==0) 
break; 
\ 
SetAPen(&rp2,iL); 
Move (&rp2,125L,.y*10L+MITTE[kick]+VY-SLOTS*SL+6L+3L) ; 
Text(&rp2,slots[version] [y] .who,8L); 
Move (&rp2,220L,y*10L+MITTE[kick]+VY-SLOTS*5L+46L+3L) ; 
Textiärp2,str,6L); 


SetAPen(&rp2,2L); 

Move (&rp2,126L,y*10L+MITTE[kick]+VY-SLOTS*5L+6L+3L) ; 
Text (&rp2,slots[version] [y] .who,8L) ; 

Move (&rp2,221L,y*10OL+MITTE[kick]+VY-SLOTS*5L+6L+3L) ; 
Text (&rp2,str,6L); 


1 
interein(); 
einblenden (color2,0); 


ausblenden (nichtstil1l) 
int nichtstill; 


/* Ausblenden von Grafik und, wenn 'nichtstill' ungleich Null, von Sound 
(Soundfile 15) */ 


I 
int i,3; 
UWORD zcol; 


tor(j=0:jt16;Jj++) I 
syne(); 
if(nichtstill) I 
soundvol (15,60-j*4,3) 
soundvol (15,60-j*4,4) 


forlimozicäc;ir+) I 
zcol=* ((UWORD *)vp.ColorMap->ColorTable+i}; 
if (2c01&0x£00) 
zcol-=0x100; 
if (zcol&0xofo) 
zcol-=0x010; 
if (zcol&0x0of) 
zcol-=0x001; 
SetRGB4(&vp, (long)i, (long)zcol/256, (long) (zcol/16)%16, 
tlong)zcolX16); 


’ 
’ 


I 
for (i=0;icHIaczi+r) I 
zcol=*((UWORD *)vphi.ColorMap->ColorTable+i); 
if (zcol&0xf00) 
zcol-=0x100; 
if(zcol&0x0f0) 
zcol-=0x010; 
if (zcol&0x00f) 
zcol-=0x001; 
SetRGB4 (&vphi, (long)i, (long) zcol/256, (long) (zcol/16)*16, 
{long) zeolt16): 


he De 


Bi sn a 


= «inblenden(table,nichtstill) 

© WORD tablel]; 

= Ant nichtstill; 

BE /* Einblenden von Grafik mit Farbtabelle, die durch table[) festgelegt 
wird, und, wenn 'nichtstill' ungleich Null, von Sound {Nr.15) */ 

m ı 

‘ int i,jr 

B UWORD zcol; 


tor (j=0; je16; j++) I 
< ayne(): 
if(nichtstill) I 
= 


soundvol (15,j*4+4,3); 
soundvol (15,j*4+4,6); 
) 
tor(i=s0;icac;i+r) | 
zcol=*((UWORD *)vp.ColorMap->ColorTable#+i); 
ift(zcol&0xf00) < (table[i]&0xfoo)) 


zcol+=0x100; 

if((zcol&0x0f0) < (table[il&0x0f0)) 
zcol+=0x010; 

if((zco1&0x00f) < (table[i]&0xoof)) 
zcol+=0x001; 


SetRGB&4 (&vp, (long)i, (long)zcol/256, (long) (zcol/16)416, 
tlong)zcols16): 
j 
tor(i=0;icHIAC;i++) | 
zcol=*((UWORD *)vphi.ColorMap->ColorTable+i): 
ifl(zcol&0x£00) < (colorhil[li)&0xfoo)) 


zcol+=0x100; 

it((zcol&0x0£0) < (colorhili]&0x0f0)) 
zcol+=0x010; 

ifltzc01&0x00f) < (colorhilij&0x0of) 
zcol+=0x001; 


SetRGB4 (&vphi, (long)i, (long) zcol/256, (long) (zcol/l16)N16, 
(long)zcolu16); 


eintrag(wieviel) 
ULONG wieviel; 


/» Eintragen in die Pighscore-Liste (Joystick rechts/links = Cursor steuern, 
nach oben/unten = Buchstaben wechseln, Feuerknopf = Beenden) */ 


ı 
int i,j.k; 
char z,c; 


for(i=0;itSLOTS;i++) I 
if(slots[version] [i].score<wieviel) 
break; 
\ 
if (im=SLoTs) 
return(); 
tor (j=SLOTS-1;Jj>i,j-—-) 
slots[version] [j]=slots[version) [3-1]; 
slots[version] [i] .score=wieviel; 
Lortj=0; jc8;j++) 
slots[version) [i].wholjj=* '; 


showhi(); 
z=1; j=0; 
do | 


ifl(custom->joyldat>>1 *” custom->joyldat)&l) 
z=(2+27)%28; 
else if((custom->joyldat>>1 ” custom->joyidat)&0x100) 
z=(z+1)%28; 
else iflcustom->joyldat & 0x200) | 
itijr I 
j--; z=eslots[version] [1] .wholj]-"'?'; 
l 
ı 
else iflcustom->joyidat & 2) | 
iet(jen) I 
j++; z=slots[version] [i].wholj]-"?'"; 
I 
l 
if(z<0) 
iflzum'! '-'?*) 
z=e1; 
else 
z=0; 
if(z«=1) 
eu 7 
else if(z==0) 
em'.'; 
else 
caz2+'?'; 
slots[version] [i] .wholj]=c; 
tor ik=0;k<7;k++) I 
SetAPen(&rp2, (long)2*(k%2)); 
Move (&rp2,125L+10L*j,i*10L+MITTE[kick]+VY-SLOTS*5L+2L+6L+3L) ; 
Draw(&rp2,125L+10L*j+10L,i*10L+MITTE[kick]+VY-SLOTS*S5L+2L+6L+3L) ; 
syne(); 
l 
SetDrMdl&rp2,JAM2): 
Move (&rp2,125L+10L*j,i1*10L+MITTE[kick] +VY-SLOTS*5L+6L+3L) ; 
Text(&rp2," ",1L); 
Move (&rp2,126L+10L*j,i"r10L+MITTE[kick] +VY-SLOTS*5L+6L+3L} ; 
Text(&rp2," ".iL); 
SetDrMd(&rp2,JAMl); SetAPenl&rp2,1L); 
Move (&rp2,125L+10L*j,i*10L+MITTE[kick) +VY-SLOTS*5L+6L+3L) ; 
Text (&rp2,&c,1L); 
SetAPen(&rp2,2L); 
Move (&rp2,126L+10L*j,i*10L+MITTE[kick] +VY-SLOTS*SL+6L+3L) ; 
Texti&rp2,&c,1L); 
I while (ciaa->ciapra&0x80); 
while ((ciaa->ciapras0xs0)==0) ; 
' 


syne() 


/* Bildschirmzeile abwarten (| VBeamPos() wird an Stelle von WaitTof() oder 
WaitBOVP() verwendet, da diese Forbid() wieder desaktivieren ) */ 


while (VBeamPos() «240! |VBeamPos ()>249); 
while (VBeamPos ()<250); 


Listing 5: Invadercraft: Menü als Objectfile. 


WIENER TER WORD 


LISTING 


Ein Bestseller 
istnoch besser 
geworden! 


_ Programmieren | 
mit hochauflösender | 


Marrai dann 


| 


Jetzt ist die völlig überarbeitete und 
erweiterte 2. Auflage dieses Standard- 
werkes für den systematischen Ein- 
stieg in die Computergrafik erhältlich. 


Die kurzen BASIC-Programme verwen- 
den als Besonderheit nur einen, auf 
jedes Computersystem problemlos an- 
wendbaren Grafikbefehl, sind selbster- 
klärend und können top-down gelesen 
werden. Damit es aber noch einfacher 
wird, sind als Anhang zusätzlich die 
Listings für den Commodore C-64/128 
und den ATARI ST gleich mit abgedruckt. 


248 Seiten, 78 Abb., Paperback 
ISBN 3-907007-02-6, DM45.— 


DAS KLEINE PC-LEXIKON erklärt leicht 
verständlich knapp 600 Fachbegriffe 
rund um den Personal Computer und be- 
sticht durch seine Übersichtlichkeit. Es 
ist handlich — eines der wenigen Ta- 
schenbücher, das in einer Rocktasche 
auch wirklich Platz findet — und leistet 
durch die praxisnahe Auswahl nicht nur 
dem Einsteiger wertvolle Hilfe. 


132 Seiten, DIN A6, Paperback 
ISBN 3-907007-05-0, DM 15.— 


Erhältlich in jeder guten Buchhandlung 
oder direkt bei 


MIKRO+KLEINCOMPUTER 


Informa Verlag AG 


Postfach 1401, CH-6000 Luzern 15 
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JUISTING 


/* 


InvaderCcraft von J.Hertel 
Ic) CW-Publikationen 


"sound.c“ 
Wenn keine Soundfiles verfuegbar sind, kann dieser Programmteil 
vollstaendig weggelassen werden ! 
Kompilieren mit Aztec C Version 3.202. 


Im Include-Directory muss sich das Header-File "invadercrafti.h* befinden! 


Aufruf: cc sound -a 
as sound 


Linken: siehe invadercraft.c 
“/ 
#include <libraries/dos.h> 


#include <devices/audio.h> 
#include 


/* Vor Compiler-Aufruf unbedingt "invadercrafti.h* in include/ - 
Directory kopieren! */ 


#include <invadercrafti.h> 


extern struct FileinfoBlock *fib; 
extern struct Lock *lock, *Lock(); 
extern struct FileHandle *fh, *Open(); 
extern long Read(),Examine(); 

extern UBYTE *AllocMem(); 


struct MsgPort *port[5],*Cr 
struct IOAudio *ioa[5],Cre 
long OpenDevice() ‚deverror=1; 


UBYTE alloc[]=l0xfl; 


/* Fuer jeden Sound sind hier der Name, die Rate, die Anzahl an 
Wiederholungen und die Lautstaerke einzutragen (in dieser Reihenfolge). 


Name: Unter diesem Namen ist der Sound auf Diskette zu finden. 
Wird eine 0 (ohne Anfuehrungszeichen) eingetragen, so giit der 
Sound als nicht verfuegbar, die uebrigen Eintraege koennen entfallen. 


Rate: Frequenzbestimmend, in der Regel etwa 90...1000 (alle bekannten 
Digitizer messen die Frequenz in dieser Einheit 


Wiederholungen: >= 0, 0 entspricht dauernder Wiederholung 

Lautstaerke: 0...64, 64 entspricht maximaler Lautstaerke 
Laengenangabe ist nicht erforderlich. 

Die folgende Eintraege sind fuer die Sound-Daten auf der Leserservice- 


Diskette zurechtgeschnitten und dienen als Beispiel fuer eigene Kreationen. 
“= 


struct format sdata[ANZSOUNDS]=I /* Nr. Bedeutung “/ 
I"ic.data:sound/0”",400,1,501, /», 0 Schuss abgefeuert */ 
I"ie.data:sound/1”,400,1,641, ii Panzer abgeschossen */ 
101, /w 2 Panzer bewegen */ 


sound/3",400,1,641, “3 Panzer ueberollt */ 
sound/4",350,1,501, "4% Missile abgefeuert */ 
sound/5",450,1,64], A} Invader abgeschossen */ 
sound/6",300,1,64], /* 6 Invader bewegt sich */ 
sound/7",400,1,641, /* 7 Bunker getroffen */ 
sound/8",400,1,64|, /* 8 Missile getroffen */ 
ound/9",400,1,64], A Mutterschiff abgeschossen */ 
sound/10*,1300,1,451, /* 10 Mutterschiff bewegt sich */ 
sound/11",480,1,64], /* 11 "Get Ready” */ 
sound/12",490,1,64], /* 12 "Game Over” */ 
sound/13",500,1,64], /* 13 zus. Sound zu "Get Ready” */ 
Irie.data:sound/14",200,1,351|, /* 14 zus. Sound zu "Ga er" #/ 


/* Die folgenden Eintraege an Wiederholungen und Lautstaerke sind 
ausnahmsweise mit 0 zu fuellen (Keinen One-Shot-Sound verwenden) */ 


I"ic.data:sound/menusound",300,0,0], /* 15 Sound waehrend der Menus */ 


("ic.data:sound/titelsound",240,0,0|, /* 16 Titelsound waehrend des Ladens */ 


1} 


soundladen (i} 
int i; 


/* Erkennen der Laenge der Sounds, Speicher reservieren und File laden 
4 gibt die Nummer 


' 


Listing 6: Mit Sound.c lassen sich akustische Effekte in das Spiel einbinden. 
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ifisdata[i] .name==0 
returni); 
i£l(fib=(struct FileInfoBlock *)AllocMen| (long)sizeof (struct 
FileInfoBlock) ‚MEHF_PUBLIC))==0) 
eloseall(i); 
if((lock=-Lock (sdata[i).name,ACCESS_READ) )==0) | 
printf("Sound-Datei %s existiert nicht!\n",sdatali).name); 
celoseall(0); 


l 

if(Examine (lock, fib)==0) I 
printf ("Exanine() bei Sound-Datei %5 erfolglos!\n",‚sdatali).name); 
eloseall(0); 

ı 

sdatali).len=fib->fib_Size; 

UnLock (lock): lock=0; 

Freelen(fib, (long)sizeof(struct FileInfoBlock)); fib=0: 


if((sdatali).buffer=(UBYTE *)AllocMem(sdatali].len,MEMF_CHIP))==0) I 

printf("Kein Speicher verfuegbar fuer Sound-Datei %s !\n”, 
sdatali).name); 

eloseall(0); 

I 

if((£h=Open(sdata[i].name,MODE_OLDFILE))==0) | 
printf("Open!) bei Sound-Datei %s erfolglos!\n",sdatali].name); 
eloseall(0): 


1} 

ifiReadifh,sdatali).buffer,sdatali].ien) !=sdatali).ien) | 
printf("Lesefehler in Sound-Datei %s !\n"‚sdata[i).name); 
eloseall(0); 

j 

Close(fh): £fh=0; 


titelsladen() 


/* Titelsound laden und sanft einblenden */ 


int j: 

soundladen (16); 

sound(16,0,3): 

sound (16,0,4); 

fortj=0;3%33;3++) I 
synel); 
soundvol(16,j*2,3); 
syne(); 
soundvol (16, 3*2,6); 


£rees() 


/* Audio-Device, Ports und IORequests schliessen */ 


int i; 

if(ideverror) | 
CloseDevicetioca[0]); 

N ? 


torli=0;i«5;i++) 
iflioali)) 
Delete£xtIOlioali)); 


£orti=0;i<5;i++) 
if (portii}) 
DeletePort (port [i]); 


salloc() 


/* kAudio-Device eroeffnen, Ports und IORequest initialisieren */ 


Anzeigenschluß 
für die RUN Nr. 12/87 ist der 
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int i; 
forlim0;ics;i++) I 
if((port[i]=CreatePort (0L,0L))==0) I 
eloseall(1); 
J 
' 
Lorti=mo;ics;i+r) I 
if((ioali]l=Create&xtIolport[i), (long)sizeofistruct IOAudio)))==0) [ 
closeall(1); 


l 
ioa[li)->ioa_Request.io_Message.an_Node.In_Pri=20; 


ioa[0]->ioa_Length=sizeoflalloc); 

40a [0]->ioa_Da alloc; 

if(deverror=OpenDevice (AUDIONAME,OL,ioa[0),0L)) I 
printf ("OpenDevice() (AudioDevice) erfolglos\n"); 
eloseall(0); 


I 

torliw1:ics;ie+) I 
*“ioali]=*ioa[0}; 
ioali)->ioa_Request.io_Me: 
ioali]->ioa_Request.io_Unit= 


e.an_ReplyPort=port[i]: 
truct Unit *)(IL<<li-1)); 


LISTING 


BUTTER SCOUT 


Im Amiga vollbringt ein kleiner Baustein namens Blitter wahre Wundertaten. 
Er ist für die vorzüglichen Grafikeigenschaften dieses Computers 
verantwortlich. Die folgende Routine demonstriert, wie der „Flitzer“ unter 


as Programm 
„COMO“ soll zeigen, 
wie man Objekte belie- 
biger Größe auf dem 
Bildschirm darstellen und mittels 
schnellem Bildwechsel Bewegung vor- 
täuschen kann. Als Motiv dient das 
Commodore-Logo, welches sich um 
seine vertikale Achse dreht. Der letzte 
und größte Teil des Listings besteht 
aus den Daten der 32 Bewegungspha- 
sen. Wer genau hinschaut, wird fest- 
stellen, daß nicht alle Phasen exakt ge- 
zeichnet sind. Die Routine soll in er- 
ster Linie als Vorlage für eigene Pro- 
gramme dienen. Dazu ist es wichtig, 
mit einem Malprogramm wie Deluxe 
Paint II in ein Koordinatensystem sau- 
bere Einzelbilder zu zeichnen. Diese 
müssen dann als Brush abgespeichert 
werden und von einem IFF-File in 
Hex-Format übersetzt werden. Solche 
und ähnliche Programme finden sich 
beispielsweise auf der Fred-Fish-Dis- 
kette Nummer 16. 

Animiert werden diese Einzelbilder 
dann mittels der „set__obj__1“-Routi- 
ne. Eines ist jedoch zu beachten: Für 
Spiele, bei denen der Untergrund 


CRUN SECTION CODE 


openintuition EQU -30 


intuition EQU -36 
** Intuition ** 
closescreen EQU -66 


openscreen EQU -198 
ScreenTofront EQU -252 


22..Erec “ar 

AddIniServer EQU -168 
RemIntServer EQu -174 
openlib EQU -408 
closelibrary EQU -414 


“* graphics ** 
loadrgb4 EQU -192 


“* Dos #* 
exit EQU -144 


VAN TRENNEN 


wichtig ist, ist diese Routine un- 
brauchbar. Denn das Objekt wird 
nicht ausmaskiert. In der nächsten 
Ausgabe veröffentlichen wir eine 
universelle Routine, die mit Masken 
arbeitet. 

In dem vorliegenden Programm wer- 
den noch einige nützliche Betriebssy- 
stemaufrufe demonstriert. Zum Bei- 


execbase EQU 4 


* Hardware Register 


CUSTOM EQU $DFFOOO 
DMACON EQU $096 
BLTCONO EQU $040 
BLTCONI EQuU $042 
BLTAFWM EQU $044 
BLTALWM EQU $046 
BLTCPTH EQU $048 
BLTCPTL EQU $04A 
BLTBPTH EQU $O4C 
BLTBPTL EQU $SO4E 
BLTAPTH EQU $050 
BLTAPTL EQU $052 
BLTDPTH EQU $054 
BLTDPTL EQU $056 
BLTSIZE EQU 5058 
BLTCMOD EQU $060 
BLTBMOD EQu $062 
BLTAMOD EQU $064 
BLTDMOD EQU $066 


Assembler programmiert werden kann. 


spiel: Öffnen von Screens, Setzen der 
Farbpalette oder die Behandlung von 
Interrupts. Zur Initialisierung von 
„se_obj _l*“ wird die Routine 
„sprite__0“ benutzt. Als Übergabepa- 
rameter werden hier im Register AO 
der Pointer auf die Objektdaten und 
in A2 der Pointer auf eine Pseudomas- 
ke verlangt. Diese Pseudomaske ist 
wie folgt aufgebaut: 

1. Word: Breite in Words -1 

2. Word: Breite in Punkten 

3. Word: Höhe in Zeilen 

Dadurch können alle wichtigen Daten 
berechnet werden. In der nächsten 
Ausgabe, wenn wir mit Masken arbei- 
ten, wird dieses deutlicher. Diesmal 
liegt der Schwerpunkt in der Program- 
mierung des Blitters. Daher wird die 
Hauptroutine im folgenden separat 
kommentiert. 

Das Programm wird mittels eines As- 
semblers, zum Beispiel dem K-Seka, 
eingegeben. In dem Programm „Inva- 
derCraft“, abgedruckt im selben Heft, 
versteckt sich übrigens eine C-Routi- 
ne, um IFF-Files in Hex-Code zu über- 


tragen. 
(A. Schulze) O 
BLTCDAT EQuU $070 
BLTBDAT EQU $072 
BLTADAT EQU $074 
POTGO EQU $034 
POTGOR EQU $016 
PRA EQU $SBFEOOI 
DMACONR EQu $002 


BEITEITIIIIITIII Teer 
“* Makros ** 
callintu MACRO offset 
move.l intuitionbase, a6 
jsr 01 (a6) 
ENDM 
callexec MACRO offset 
move.l execbase,a6 
jsr O1la6) 
ENDM 
calldos MACRO offset 
move.i dosbase, a6 
jsr O1la6) 
ENDM 
callgfx MACRO offset 
move.l gfxbase,a6 
jsr Olla6) 
ENDM 
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LISTING 


set_obj__1: 
bsr wait_blt zunächst muß gewartet werden, bis der 
Blitter mit seiner Arbeit fertig ist. 


move.w #-2,BLTAMOD(a6) negativen Modulus für Source 
subq.w #2,d4 darum auch den errechneten MOD 
move.w D4,BLTDMOD(A6) um 2 vermindern 


move.l #SFFFFOOOO,D1 FirstMaskword benutzen und Last 

move.l D1,BLTAFWM(A6) nicht benutzen, bzw. löschen. Hier- 
durch wird erreicht, daß man nicht ein 
Nullword am Ende jeder Objektzeile 
benötigt. 


TOr.W #4,D5 Shiftbits in richtige Position bringen 
or.w #S9FO,D5 Blitterbefehle D= A 

move.w D5,BLTCONO(A6) 

move.w D7,D4 Breite und Höhe für Blitter berechnen 
Isl.w #6,D7 

addq..w #1,d6 


bsr wait__blt 

move.l AS5,BLTAPTH(A6) Sourceadresse 

move.|l DO,BLTDPTH(A6) Destinationsadresse 

move.w D7,BLTSIZE(A6) Breite, Höhe übergeben und starten = 
add.l D2,DO Pointer auf nächstes Plane 

add.l D4,a5 Pointer auf nächstes ObjektPlane 

dbra D5,nextpl2 4 mal 

rts 


Zusätzliche Erläuterung zur Kernroutine des Programms „Como“ 


EEE EEE EEE ee ee ee move.1 d0,a0 
* Programm zur Darstellung von Objekten ohne Maske. “ 
* Diesese Beispiel zeigt das Commodorezeichen in Drehung. * 
* 32 Objekte werden nacheinander dargestellt. ” 
* Autor: Achim Schulze ® 
* Hier beginnt das Programm ® 
Ba BE EEE SE EZ 2 ea SE ee een 

lea gfxname ‚al * libraries oeffnen 
callexec openlib 

move.l dO,gfxbase 

lea intname, al 

move.l dO,Screenx abgelegt. 


move.l $c0(a0),show_ser 


show_scr = Pointer auf erste 


" Plane 
bsr elr_scr * Screen loeschen 
bsr set_pal * Farbpalette setzen 
bsr moveobj * Objekte in dummyscreen kopieren 


lea Inter,al 

moveq #5,d0 

callexec AddIntServer 
bsr make_tab 

bsr rotate 

5 The_end: 

) lea Inter,al 


VBL-Interrupt 

wird benutzt um eine 
gleichmaessige Verzoegerung 
zu erhalten 

zur Hauptroutine 


VBL-Interrupt wieder 


ausschalten 
lea dosname,,al moveq #32,40 
callexec openlib callexec RemIntServer 
move.l dO,dosbase 
move.l Screen,a0 * alle Screens loeschen 


lea newscreen,a0 einen dummy Screen oeffnen callintu closescreen 
move.l Screeni,a0 
callintu closescreen 
move.l Screenx,a0 


callintu closescreen 


callintu openscreen hier werden die Daten der 


move.l dO,intuitionbase 
Objekte 
das die 


Objekte sich in den unteren 


callexec openlib 
“ 
. 
. 
. 
move.1 d0,a0 * Dadurch ist gewaehrleistet 
. 
. 
* 512K befinden. 


move.l $c0(a0) ‚workx prg_end: 
move.l intuitionbase ‚al 
callexec closelibrary 


Libraries schliessen 
lea newscreen,a0 * WorkScreen oeffnen 
callintu openscreen * in diesem Screen werden die 
move.l dO0,Screen * neuen Objekte gezeichnet bevor 
* sie dann durch umschalten 
* der Screens angezeigt werden 


move.l gfxbase,al 
callexec closelibrary 
move.1l dO,screen« 
move.l dO,work_scerl 
move.1l dO,a0 


move.1l dosbase,al 
callexec closelibrary 


move.l $c0Ola0) ,‚work_ser * work_scr = Pointer auf erste moveg #0,dı * Programm beenden 
* Plane calldos exit 
lea newscreen,a0 “* ShowScreen oeffnen BEE ISIS ES ee 
callintu openscreen tofront: 
move.il dO,Screeni move.l screenw,a0 * nicht sichtbaren Screen 


move.l dO,show_sceri * anzeigen 
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callintu ScreenToFfront 

rts 
change_scr: 
work_scr1,d0 
show_scrl,work_scri 
move.l dO,show_seri 
move.l dO,screenw 
move.l work_scr,do0 
move.l show_scr,work_scr 
move.i dO,show_ser 


color_tab,al 


move.l work_scr1,a0 


ScreenPointer vertauschen 


Farbpalette fuer beide 
Screens setzen 


WE 


Objekte in den 
DummyScreen kopieren 
dadurch laeuft dieses 
Programm 

auf jedem AMIGA 

t auch ueber 512K ) 


VBL-Zaehler erhoehen 


bsr set_color 
lea color_tab,al 
move.l show_scr1,a0 
set_color: 
add.ı #44,a0 
moveg #32,d0 
callgfx loadrgb4 
rts 
moveobj: 
move.l workx,al 
lea OBJEKTE, a0 
move.w #6749,d0 
setallo: 
move.1 (a0)+,(al)+ 
dbra 40,setallo 
rts 
Sm——m——m—miuin—ununinneneennnnno. 
MyInt: 
addg.1 #1,vblcount 
moveq #0,d0 
rts 


dieses geht offiziell 
auch wie folgt 
addq.i #1,(al) 


“ das Betiebsystem gibt in al den Pointer auf die Datas zurueck 


BELEIIZEIEZZIIZEIZI ISIS SIE 


rotate: 
elr.w wich_spr 
nextl: 
move.w wich_spr,dOö 
isl.w #2,d0 
lea sprite_tab,a0 
tst.1 0(a0,d0.w) 
bmi rotate 
lea xy_offs,al 


move.w O(al,d0.w),x 

move.w 2(al,d0.w),y 

move.1 0(a0,d0.w),a0 

lea ob_nsk,a2 

bsr sprite_o 

bsr flip_page 

addq.w #1,wich_spr 
lea CUSTOM, a6 
MOVE.W #5c00,POTGO (a6) 
btst #10, POTGOR (a6) 
bne test_end 
addq.1 #1,speed 
cmp.1 #5,speed 
ble test_end 
elr.1 speed 


move.l workx,do 


lea sprite_tab,a0 
moveq #31,diı 
mt_lp: 
move.1l d0,(a0)+ 
add.1 #832,d0 
dbra di,mt_ip 
move.i #-1, (a0) 
rts 
k,mmummmnmuuumununun un ununnunn nn n num —n nun 
elr_scr: 
move.l show_scr,a0 
move.l work_scr,al 
move.w #7999,d0 
elr_seri: 
eir.ı ta0)+ 
elr.ı (al)+ 
dbra 40,cir_scri 
rts 
Rununnnnn ann nn nn nn nn nn nn nn nn 
flip_page: 
bsr change_ser 
bsr tofront 
move.l vblcount,do 
add.i speed,dO 
wait_lp: 
emp.1 vblcount ,doO 
bgt wait_lp 
rts 


WuhkERuERERE EEE nn 


nummer des zu benutzenden 
Objektes 


mal 4 

Pointer auf Objekt=Tabelle 
holen 

-1 = Tabellenende 


X-Koordinate setzen 

Y 

Pointer auf Objekt nach AO 
Pointer auf Maske nach A2 
Objekt in workscreen zeichnen 
seiten umschalten 

naechstes Objekt 


rechte Maustaste abfragen 

nicht gedrueckt ? dann weiter 
sonst Geschwindigkeit vermindern 
5 = Speedmin 0 = max 

schom min ? 

ja dann wieder max 


linke Maustaste testen 
wenn gedrueckt dann ende 


Tabelle fuer die Objekte erstellen. 


32 Objekte 


832 Bytes ist ein Objekt gross 


Screens loeschen 


“unnnunneaEnaeuRnennen 


** SETZT BELIEBIGE OBJEKTE OHNE MASKE INS PLAYFIELD 


"* UEBERGABE-PARAMETER 

”* A5 = POINTER AUF SPRITEANFANG 
““ D2 = OFFSET NAECHSTE BITPLANE 
”* D4 = MODULO 


LISTINE 


** D5 = SHIFTWERT IN BITS 
*“ D7 = LAENGE DES SPRITES 
** D6 = BREITE DES SPRITES IN WOERTERN 
"®* DO = ZIELADRESSE 
set_obj_1: 
bsr wait_blt 
move.w #-2,BLTAMOD (a6) 
subg.w #2,d4 
move.#w D4,BLTDMOD(A6) 
move.i #SFFFFO000,D1 
move.l D1,BLTAFWM(A6) 
ror.w #4,D5 
or.w #S9F0,D5 
move. D5,BLTCONO (A6) 
move.w D7,D4 
isl.w #6,D7 
addgq.w #1,d6 
or.b D6,D7 
moveq #3,D5 
subq.w #1,D6 
isl.w #1,D6 
mulu D6,D4 
nextpl2: 
bsr wait_blt 
move.l A5,BLTAPTH(A6) 
move.l DO,BLTDPTH(A6) 
move.w D7,BLTSIZE(A6) 
add.ı D2,DO 
add.ı D4,a5 
dbra D5,nextpl2 
rts 
BEE EZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ SZ ZI SEI SS IS SE Eee 
wait_blt: 
lea CUSTOM,A6 
btst #14, DMACONR (A6) 
bne wait_blt 
return: 
rts 
WERTET 
sprite_o: 
move.w 2la2),d2 * breite in punkten 
move.u 4(a2),d? * hoehe in Zeilen 
move.l work_scr,a5 
moveq #40,d4 
move.w (a2),d6 * breite in woertern - 1 
addq.u #1,d6 * D6 breite des Sprites in Woerten 
sub.w d6,d4 
sub.w 46,d4 * D4 Modulo fuer die naechste Zeile 
move.w x,d0 
emp.w #320,d40 
bge return 
move.w doO,dS 
and.w #15,d5 * Shiftwert in Bits 
add.w 40,d2 
bmi return 
and.w #stf£o,do 
asr.w #3,d0 
tst.w 40 
bmi return 
move.w y,al 
mulu #0,dı 
add.w d1,a5 
add.w do,a5 
move.l a5,d0 
move.1l #8000,d2 * Offset naechste Plane 
move.1l a0,a5 * A5 Zeiger auf Spritedaten 
bra set_obj_1 


WER EEE RER EN 


DRUN SECTION DATA 


dosname: ac.b 'dos.library',O 
intname: dc.b "'intuition.library',Oo 
gfxname: dc.b 'graphics.library',O 
COM: dc.b °COMMODORE',O 
CNOP 0,2 
mm——m———————m—mmumnunn num un. 
newscreen: de.w 0,0 
width: dc.w 320 
height: dc.w 200 
pl: dc.w4 
ac.b 2,1 
modes: dc.w $O 
Type: de.w 15 
dce.1 0 * £ont 
de.1 0 * Screen_asc 
de.1 0 * Gadgets 
de.1 0 * CustomBitMap 
Ym—m mu nn nun 
* Interrupt-Structure so ein Quatsch 
Inter: 
dc.10 “no next list 
de.1 0 *“ no last list 
dc.b 2 * Type = Interrupt 
de.b 127 * Prioritaet 
de.1 0 * no Name 
de.1l vblcount * pointer auf Data's 
de.1l MyInt * pointer auf Interrupt-Routine 
Pointer: dc.1 0 
color_tab: dce.w $000,$fff,$33f,$084,5048,$081,$c00,$£90 
dc.w Seal,$edi1,$bd2,$6c3,$3a3,$aaa,$777,$555 
äcb.w 16,0 
xy_offs: 


dc.w 128,087 
de.w 132,087 
dc.w 140,087 
dc.w 138,087 


* x,y der Objekte 


VHS EEE TERN SEN, 
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de.w 135,087 dc.1 $S1FCO0O7F,SFEO00000,S1FF0000,0 


dc.w 128,088 de.1 SFF87C0,0,$7FFFCO,O 

arm 400,008 de.1 $3FFFCO,0,SFFFCO,O 

RE eh dc.1 $3FFCO,0,57F80,0 

ac.w 120.087 dc.1 0,0,538000,0 

de.w 125.087 dc.1 $1C0000,0,$700000,0 

de.w 128,086 de.1 $1C00000,0,$3800000,0 

de.w 125,087 dc.1 $7000000,0,SE000C00,0 

de.w 121,087 dc.1 $E000380,0,$1C000380,0 

dc.w 122,087 de.1 $1C000380,0,$1C000380,0 

de.w 125,087 de.1 $1C000380,0,$1C000000,0 

@c.w 125,087 dc.1 $1C00007F,$E0000000,$1C00007F,$F0000000 
a N dc.1 $1C00007F, $F8000000,$1C00007F,$FC000000 
Aarau en dc.1 $E00007F,$FE000000,$E000000,0 

dce.w 130.088 dc.1 $7001800,0,53800000,0 

de.w 130,088 de.1 $1C00000,0,5700000,0 

de.w 133,088 dc.1 $1C0000,0,$38000,0 


de.w 133,087 
dce.w 128,087 


dcb.1 28,0 
dc.1 $380,0,$380,0 


te ac.1 $380,0,$380,0 
ae dc.1 $380,0,$1FF,$FE000000 
de.w 128,087 a. 64,0 
de.w 128,087 c.1 0,0,$3FC0,0 
de.w 128,087 dc.ıi $1FFEO,0,$7FFEO,O 
dc.w 125,087 de.1l SIFFFEO,0,S3FFFEO,O 
ae Eee de.1 S7FFFEO,O0,SFFOOEO,O 
RE dc.1l SFEO07F,SF8000000, $1FCO07F,$F0000000 
SE En ra 
= & 2 12 c.1 $1F8007F, ’ R 
ee ee nee a0 Masern de.1 S1F8007F,$80000000, $1F8007F,$C0000000 
. De te nen dc. $1F8007F ,SE0000000, $1FCOO7F,$F0000000 
Ken de.1 SFEOOTF,SF8000000,$FF0000,0 
ERTE: de.1 $7F80E0,0,$3FFFEO,O 
EN 52,0 dc.1 $FFFEO,0,S7FFEO,O 
de.1 0,0,$7FF,$C0000000 dc.1 SIFFEO,0,S3FCO,O 
de.1 $7FFF,$FC000000, $3FFFF,SFC000000 dc.1 0,0,$3C000,0 
de.1 SFFFFF,SFC000000 ,$3FFFFF,SFC000000 dc.1 $1E0000,0,$780000,0 
de.1 SFFECOO,$7C000000, $1FFFO00,$3C000000 de.1 S1E00000,0,$3C00000,0 
de.1 $3FFC000,$CFFFFFO,S7FFO000, SFFFFCO dc.1 $7800000,0,$F000F00,0 
dc.1 $7FEO000,SFFFFOO,SFFEO000,SFFFCOO dc.1 $F000000,$7800000, $1E000000,$F000000 


dc.1 
dc.1 


$FFC0000, $FFF000,SFFC0000,0 
$FFCO000,$FFFO00, SFFEO000,SFFFCOO 
$7FEO000,SFFFFOO,S7FFO000, SFFFFCO 
$3FFC000,$FFFFFO,S$LFFF000,$8000000 
SFFFEOO,$7C000000, $3FFFFF,$FC000000 
SFFFFF,$SFCO00000,S3FFFF,SFC000000 
STIFFF,SFCO00000,$3FF,$E0000000 


deb.1 4,0 


dc.1 
dc.1 
dc.1 
dc.1 
de.1 
de.1 
dc.1 
de.ı 
de.1l 
de.1l 
dc.1 
de.1 


$8000,0,$40000,0 

$100000,0,$400000,0 

$10000FF, $80000000, $2000000, 540000000 
$4000000,$11000008,$8000000,$1000020 
$8000000,$1000080,$10000000, $1000200 
$10000000,$1000800,510000000,0 
$10000000,$FFF000,$10000000, $FFFCOO 
$8000000,$FFFF00,$8000000, $FFFFCO 
$4000000, $FFFFFO,$2000000, $30000000 
$1000003,$80000000,$400000,0 
$100000,0,$40000,0 

$8000,0,$400,0 


dcb.1l 28,0 


de. 
de. 
dc.1 


0,$1000000,0,$1000200 
0,81000080,0,$1000020 
0,$1000008,0,$1FFFFF& 


dcb.1 64,0 


de.1 
dc.1 
de.1 
de.1 
ac.1 
de.1 
dc.1 
dc.1 
de.1 
de.1 
de.1 
de.1l 
dc.ı 
deb.1 
dc.ı 
dc.1 
dc.1 
dc.ı 
dc.1 
dc.1 
de.1 
dc.ı 
dc.1 
dc.1 
de.1 
de.1 


0,0,$1FFE,O 
STFFF,$E0000000, $3FFFF, SE0000000 
$7FFFF,$E0000000, $1FFFFF,SE0000000 
STIFFEOF, S$E0000000, $FFF800, $E0000000 
$FFEOO0,S7FFFEOO, SIFF8000,$7FFF800 
$1FE0000,$7FFF000,$3FE0000,$7FFCOOO 
$3FC0000,$7FF0000,$3FC0000,0 
$3FC0000,$7FF0000,$3FEO000,S7FFCOOO 
$1FE0000, $7FFFOOO, SIFF0000,S7FFF800 
$FFCO00,S7FFFEOO,SFFFOO0,O 
STFFCO3,$EOO00000, $IFFFFF,SEO000000 
S7FFFF,SEO000000, $3FFFF,$EO000000 
$TFFF,SC0000000, $7FF,$80000000 

4,0 

$18000,0,$C0000,0 

$180000,0,$600000,0 
$18001F0,0,$3000007,0 
$3000000,$18000000,$6000000,$18000000 
$6000000,$18000000,$C000000,$18000000 
$c000000, 818000000, $cC000000,0 
$C000000,$7FF0000,$C000000, $7FFCO00 
$6000000,$7FFF000,$6000000,$7FFF&0O 
$3000000,$7FFFEO0, $3000001,$E0000000 
$180000C,0,$600000,0 
$180000,0,$C0000,0 

$18000,0,51800,0 


dcb.1l 28,0 


dc.1 
dc.ı 


dc.i 


0,$18000000,0,$18000000 
0,518000000,0,$18000000 
0,$18000000,0,$1FFFFCOO 


dcb.1l 64,0 


dc.1 
de.1 
de.1 
de.1 
de.l 
de.l 
dc.1 
de.1 
de.ı 


0,0,$7F80,0 

$3FFCO,0,SFFFCO,O 

$S3FFFCO,0,S7FFFCO,O 
SFFFFCO,0,$1FE03C0,0 
S1FCO07F,$FFO00000,$3F8007F,$SFE000000 
$3F0007F,$FC000000, $3F0007F ,$F8000000 
$3F0007F,$F0000000,$3F00000,0 
$3F0007F,$E0000000, $3F0007F,$F0000000 
$3F0007F,$F8000000,$3F8007F,$FC000000 


de.ı 
dc.l 
dc.ı 
dc.1 
de.l 
dc.l 
dc.1ı 
dc.1 


$1E000000, $1E000000, $1E000000, $3C000000 
$1E000000,$78000000,$1E000000,0 
$1E00007F,$80000000, $1E00007F,$C0000000 
$1E00007F,$E0000000, S1E00007F,SF0000000 
$F00007F,$F8000000, $F000000,0 
$7800F00,0,$3C00000,0 
$1F00000,0,$780000,0 

$1E0000,0,$3C000,0 


dcb.1 28,0 


dc.i 
dce.ı 
dc.1 


0,$78000000,0,$3C000000 
0,$1E000000,0,$F000000 
0,$7800000,$3F,$FF800000 


dcb.1 64,0 


dc.1 
dc.1 
de.ı 
dc.ı 
dc.l 
dc.1 
dc.1 
dc.l 
dc.ı 
dc.1 
dc.1 
dc.1 
dc.1 
dc.1 
dc.1 
de.l 
dc.1 
dc.ı 
de.1 
dc.ı 
dc.1 
dc.1 
dc.1 
dc.ı 
dc.1 
dc.ı 


0,0,$7F,0 

S1FF,$80000000, $3FF,$80000000 
$7FF,$80000000,$FEF,$80000000 
$1FC7,$80000000,$3F87,$80000000 
$3F00,$3FF00000,$7E00,$3FE00000 
$7C00,$3FC00000,$7C00,$3F800000 
$7C00,$3F000000,$7C00,0 
$7C00,$3F000000,$7C00,$3FC00000 
$7E00,$3FE00000,$3F00,$3FF00000 
$1F80,0,$FC3,$80000000 
$7F3,$80000000, $3FF,$80000000 
$1FF,$80000000,$FF,$80000000 
$3F,0,0,0 

0,0,$F80,0 

$3E00,0,$7C00,0 

$F800,0,$1F010,0 
$3E038,0,$7C018,0 
$7C007,$C0000000,$F8007,$C0000000 
$F8007,$C0000000,$F8007,$C0000000 
$F8007,$C0000000,$E8000,0 
$F8000,$3F000000,$F8000,$3FC00000 
$F8000, $3FEO0000,$7C000,$3FF00000 
$7E000,0,$3F03C,0 
$1F80C,0,$FC00,0 

$7E00,0,$3F00,0 

$FC0,0,0,0 


dcb.1 28,0 


ac.ı 
ac.ı 
dc. 


7,$C0000000,7,$c0000000 
7,$C0000000,7,$C0000000 
3,$FFF00000,0,0 


dcb.1 64,0 


dc.ı 
dc.ı 
dc.1 
dc.1 
dc.1 
de.ı1 
dc.1 
de.ı 
dc.1ı 
dc.1 
dc.1 
dc.1 
dc.1 
de.1 
dc.1 
de.1 
dc.1 
dc.1 
dc.1 
dc.1 


0,$F0000000,3,$F8000000 
7,$F8000000,$F,$38000000 
$1E,$1C000000, $1E,$1C000000 
$3C,$1C000000,$3C ,$3FC0000 
$3C,$3F80000,$38,$3F00000 
$78,$3F00000,$78,$3E00000 
$78,0,$78,$3E00000 
$78,$3F00000,$38,$3F00000 
$3C,$3F80000,$3C,$3FC0000 
$3C,0,$1E,$3C000000 
$1E,$3C000000,$F,$7C000000 
7,$FC000000, 3,$FC000000 
0,$F8000000,0,0 

S3F,0,$FC,0 
$ıF8,0,$3F0,$C0000000 
$7E1,$E0000000, $7E1,$E0000000 
$FC3,SE0000000, SFC1,$FC000000 
$FCO,$FCO00000, $FCO,$FC000000 
$1F80,$FC000000, $1F80,$FC000000 
$1F80,0,$1F80,$3E00000 


de.1 $1F80,$3F00000,SFC0,$3F00000 
de.1 SFCO,53F80000,$FC0,$3FC0000 
de.1 $FC0,0,$7E0,$C0000000 
de.1 $7E1,$C0000000,$3F0,$80000000 
dce.1l SIF8,0,$FC,0 

de.1 $3F,0,0,0 

dcb.1 24,0 

de.1 0,0,0,$FC000000 

de.1 0,$FC000000,0,$FC000000 
dc.1 0,$FC000000,0,5FC000000 
de.1 0,$FFFC0000,0,0 

dcb.1 64,0 

dc.1 $700,0,$F80,0 

de.1 S1F80,0,$1F80,0 

de.1 $3F80,0,$3980,0 

de.1 $7080,0,8607C,0 

dc.1 $607C,0,$6078,0 

de.1 $6078,0,86070,0 

dc.1 $6000,0,$6070,0 

de.1 $6078,0,$6078,0 

de.1 $607C,0,$607C,0 

dc.1 $607C,0,$3180,0 

de.1 $3980,0,$1F80,0 

de.1 S1F80,0,$F80,0 

dc.1 $700,0,0,0 

de.1 $3F800,0,$7F000,0 
de.1 $FE000,0,$FE000,0 
de.1 S1FC000,0,$1FC600,0 
de.1 $3F8F00,0,$3F9F80,0 
de.1 S3F9F80,0,$3F9F80,0 
de.1 S3F9F80,0,$3F9F80,0 
de.ı $3F8000,0,$3F8070,0 
dc.1 $3F8078,0,53F8078,0 
de.1 $3F807C,0,$3F807C,0 
dc.1 $3F807C,0,$1FCE00,0 
de.1 $1FC600,0,$FE000,0 
dc.1 SFEO00,0,$7F000,0 
de.1 $3F800,0,0,0 

dcb.1 24,0 

de.1 0,0,$1F80,0 

de.1 $1F80,0,$1F80,0 

de.1 $1F80,0,$1F80,0 

dc.1 $1F80,0,0,0 

deb.1 12,0 

deb.1 8,0 

dc.1 0,0,$40,0 

deb.1 8,0 

de.1 $80,0,$80,0 

dc.1 $80,0,0,0 

dcb.1 24,0 

dc.1 $18,0,$518,0 

dc.1 $38,0,$38,0 

de.ı $38,0,$78,0 

de.1 $78,0,$77,0 

de.1 $67,0,$66,0 

dc.1 $E6,0,$E4,0 

dc.1 $E0,0,$64,0 

dc.1 $66,0,566,0 

dc.1 $67,0,567,0 

de.1 $77,0,$30,0 


de.1 1,$1FE00000,1,$9FE00000 
dc.1 1,$9FE00000,1,$8FE00000 
de.1 1,$8FE00000,0,$FE00000 
dc.1 2,$1FE00000,6,$1FE00000 
de.1 6,$1FE00000,$E,S1FE00000 
dc.1 SE,S1FE00000,$E,$S1FE00000 
dce.1 0,$3FC00000,0,$3FC00000 
de.1 0,$3FC00000,0,$3FC00000 
dc.1 0,$7F800000,0,$7F800000 
dcb.1 28,0 

dc.1 1,$80000000,1,$80000000 
dce.1 1,$80000000,1,$80000000 
dc.1 1,$80000000,1,0 

dcb.1 64,0 

dc.1 0,0,0,$E000000 

de.1 0,$1F000000,0,$1F800000 
dc.1 0,$1F800000,0,$1FC00000 
de.1 0,$19C00000,0,$10E00000 
de.1 3,$E0600000,3,$E0600000 
de.1 1,5E0600000,1,$E0600000 
dce.1 0,$E0600000,0,$600000 
de.1 0,$E0600000,1,$E0600000 
dc.1 1,$E0600000,3,$E0600000 
de.1 3,$E0600000,3,$E0600000 
dc.1 0,$18C00000,0,$19C00000 
dc.1 0,$1F800000,0,$1F800000 
dc.1 0,$1F000000,0,$E000000 
de.1 0,0,0,$1FC0000 

de.1 0,$FE0000,0,$7F0000 
de.1 0,$7F0000,0,$3F8000 
de.1 0,$63F8000,0,$F1FC000 
de.1 0,$1F9FC000,0,$1F9FC000 
de.1 0,$1F9FC000,0,$1F9FCO00 
dce.1 0,$1F9FC000,0,$1FC000 
dc.1 0,$EO1FC000,1,$EO1FC0O00 
de.1 1,$SEO1FC000,3,$EO1FCO00 
dc.1 3,$EO1FC000,3,$EO1FC000 
de.1 0,$73F8000,0,$623F8000 
dc.1 0,$7F0000,0,$7F0000 

dc.1 0,$FE0000,0,$1FC0000 
dcb.1 28,0 

dce.1 0,$1F800000,0,$1F800000 
dc.1 0,$1F800000,0,$1F800000 
dc.1 0,$1F800000,0,$1F800000 
dcb.1 64,0 

de.1 0,0,0,$F0000000 

dc.1 1,$FC000000,1,$FE000000 
de.1 1,$CF000000,3,$587800000 
ac.1 3,$87800000,3,$83C00000 
dc.1 $3FC,$3C00000,$1FC,$3C00000 
de.l SFC,$1C00000,$FC,$1E00000 
dc.1 $7C,$1E00000,0,$1E00000 
dc.1 $7C,$1E00000,$SFC,$1E00000 
de.1 $FC,$1C00000,$1FC,$3C00000 
de.1 $3FC,$3C00000,0,$3C00000 
dc.1 3,$C7800000,3,$C7800000 
dc.1 3,$SEF000000,3,SFE000000 
de.1 3,$FC000000,1,$F0000000 
de.1 0,0,0,$FC00000 

de.1 0,$3F00000,0,$1F80000, 


ac.1 


$3E,0,$FFFC,O 


acb.1 64,0 


de.ı 
dc.ı 
de.1 
de.ı 
de.l 
äc.ı 
dc.1 
dce.ı 
dc.1 
de.ı 
dc.ı 
de.1 
dc.1 
de.ı 
dc.ı 
“c.1 
dc.ı 
dec.1 
dc.1 
de.ı 
dc.1ı 
dc.1 
dc.1 
de.ı 
dc.1 
de.ı 


0,0,0,$3FC00000 
0,$7FF80000,0,$7FFEO000 
0,$7FFF8000,0,$7FFFCOOO 
0,$S7FFFEO00,0,$700FF000 
$S1FF,$SEOO7F000,$FF,$SEOO3F800 
$7F,SEOOLF800,$3F,$EOOL1FSOO 
$ı1F,SEOO1F800,0,$1F800 
$1F,SEOO1F800,S3F,$EOOLF8OO 
$7F,SEOOLF8O0,SFF,SEOOIF8BOO 
S1FF,SEO07F000,0,SFF000 
0,5701FE000,0,$7FFFCOOO 
0,$7FFF0000,0,$7FFEO000 
0,57FF80000,0,$3FC00000 
0,0,0,$3C0000 
0,$78000,0,$1E000 
0,$7800,0,$3C00 
0,$1E00,0,$F000F00 
$1E00,$F00,$F00,$780 
$780,$780,$3C0,$780 
$S1E0,$780,0,$780 
$ı1F,$E0000780,$3F,$E0000780 
$7F,$E0000780,$FF,SE0000780 
SIFF,SEOO00F00,0,SF00 
0,$FO01E00,0,$3C00 
0,$F800,0,$1E000 
0,$78000,0,$3C0000 


dcb.1 28,0 


de.1 
dc.i 
dc.ı 


$1E0,0,$3C0,0 
$780,0,$F00,0 
$1EO0,0,$1FFF,$C0000000 


dcb.1 64,0 N 


de.l 
dc.1 
de.1 
de.ı 
dc,ı 
de.1 
de.ı 
dc.ı 
de.ı 
dc.1 
dc.1 
de.ı 
de.ı 
ac.ı 
dc.1 
dc.1 
dc.ı1 
dc.ı 
de.1 
dc.1 
de.1 
dc.1 
dc.1l 
de.ı 
de.ı 
de.ı 


0,0,0,S1FE00000 
0,$3FFC0000,0,$3FFF0000 
0,S3FFFC000,0,$3FFFEOOO 
0,$3FFFF000,0,$3C07F800 
$FFF,SEO03F800,S7FF,SEOOLFCOO 
$3FF,$EOOOFCOO, SIFF,$EOOOFCOO 
$FF,$SEOOOFCOO0,0,SFCOO 
$7F,SEOOOFCOO,SFF,SEOOOFCOO 
SIFF,SEOOOFCOO, SIFF,SEOOLFCOO 
$7FF,SEOO3F800,0,$FF800 
0,$3E1FF000,0,$3FFFEOOO 
0,$3FFFC000,0,S3FFF0000 
0,$3FFC0000,0,$1FE00000 
0,0,0,$1C0000 
0,$38000,0,$E000 
0,$3800,0,$1C00 
0,$E00,0,$3000700 
0,$1C000700,0,$1C000380 
0,$1C000380,0,$1C000380 
0,$1C000380,0,$380 
$7F,$E0000380,$FF,SE0000380 
$1FF,SE0000380,S3FF,$E0000380 
S7FF,$E0000700,0,$700 
0,$1800E00,0,$1C00 
0,$3800,0,$E000 
0,$38000,0,$1C0000 


dcb.1 28,0 


dc.1 
de.ı 
de.i 
dc.1 


$38,0,$38,0 
$38,0,$18,0 
$18,0,0,0 
$1FEO,0,$1FEO,O0 


de.l 
de. 
de.ı 
dc.1 


0,$30FC0000,0,$787E0000 
0,$787E0000,0,$7C3F0000 
3,$F83F0000,3,$FO3F0000 
3,$F03F0000,3,$FO1F8000 


äc.1 0,$1C000000,0,$1C000000 
dc.1 0,$1C000000,0,$1C000000 
dc.1 0,$1C000000, $7FF $F8000000 
dcb.1 64,0 


dc.1 $3FC0O,0,$3FC0,0 

dc.1 $3FC0,0,$3F80,0 

dc.1 $7F80,0,$7F88,0 

de.1 $7F98,0,$7F98,0 

dce.1 $7F18,0,$7F18,0 

dc.1 $7F00,0,$7F84,0 

dc.ı1 $7F86,0,$7F86,0 

dce.1 $7F87,0,$7F87,0 

de.1 $7F87,0,$3FC0,0 

dc.1 $3FC0,0,$3FC0,0 

dc.1 $3FC0,0,$1FEO,O 

de.1l $S1FE0,0,0,0 

dcb.1 24,0 

de.1 0,0,$18,0 

dc.1 $18,0,$18,0 

dc.1 $18,0,$18,0 

de.1 8,0,0,0 

dcb.1 24,0 

de.1 0,$20000000,0,0 

deb.1 4,0 

dc.1 0,0,0,$10000000 

de.1 0,$10000000,0,$10000000 
dcb.1l 24,0 

dc.1 0,0,1,$80000000 

dc.1 1,8$80000000,1,$C0000000 
de.1 1,$C0000000,1,5C0000000 
de.1 1,$E0000000,1,$E0000000 
de.1 $E,$E0000000,$E,$60000000 


de.1 3,$FO1F8000,0,$1F8000 

de.1 $7C,$1F8000,$FC,$1F8000 

de.1 $FC,$3F0000,$1FC,$3F0000 
de.1 $3FC,$3F0000,0,$3F0000 

dce.1 0,$307E£0000,0,$387E0000 

de.1 0,$10FC0000,0,$1F80000 

dc.1 0,$3F00000,0,$FC00000 

dcb.1 28,0 

de.1 3,$F0000000,3,$F0000000 

dc.1 3,$F0000000,3,$F0000000 

dc.1 3,$F0000000,$3FF,$F0000000 
dcb.1 68,0 

de.ı $F,$E0000000,$1F,SF8000000 
dc.1 $IF,SFC000000,$1F,SFEO00000 
de.1 $1F,$57F000000,$1E,$3F800000 
de.1 $SIE,SIFC00000,SFFCO,SFCO0000 
de.1 $7FC0,$7E00000,$3FC0,$3E00000 
de.1 S1FC0,S3E00000,$FC0,$3E00000 
dce.1 0,$3E00000,$FC0,$3E00000 
dc.i $3FC0,$3E00000,$7FC0,$7E00000 
dc.1 $SFFCO,SFC00000,0,$1F800000 
de.1 $1C,$3F000000,$1C,$FE000000 
dce.1 $ıF,$SFC000000,$1F,$F8000000 
de.1 $1F,$F0000000,$F,$C0000000 
dcb.1 4,0 

dce.1 0,51F000000,0,$7C00000 

de.1 0,$3E00000,0,$1F00000 

äc.l 0,$80F80000,1,5C07C0000 


de.1 
de. 


dc.1 
dc.1 
dc.l 
de.1 
dc.1 
dc.l 
de.1 
ac.ı 
dc.1 
de.ı 
de.ı 


0,0,.0,$7FF8000 
0,$7FFFEO00,0,ST7FFFFCOO 


0,$T7FFFFEOO,0,STFFFFFBO 
0,$7FOTFFEO,O,$ST70O1FFFO 
STFFFE,STFFO,S1FFFE,S1FF8 
SFFFE,STF8,S3FFE,STFC 
SFFE,S3FC,0,SIFC 
$FFE,S3FC,S3FFE,STFC 
SFFFE,STF&,SIFFFE,SFF& 
STFFFE,S3FFO,0,SFFFO 
0,$7CO3FFEO,0,STFFFFF8O 
0,$7FFFFEOO,O0,STFFFFCOO 
0,$7FFFEO00,0,$1FFEO000 


dcb.1 4,0 


dc.ı 
de.ı 
de.1 
de.l 
de.ıl 
dc.1 
dc.1 
dce.ı 
dc.1 
dc.ı 
dc.1 
de. 


0,$1800,0,$300 
0,$180,0,$60 
0,$F80018,0,$E00000C 
1,$8000000C,1,$80000006 
1.$80000006,1,$80000003 
1,$80000003,0,83 
SFFE,3,S$3FFE,$3 
$FFFE,6,$1FFFE,S6 
STFFFE,$C,0,$7800000C 
0,$3000018,0,$60 
0,$180,0,$300 
0,51800,0,$18000 


dcb.1 28,0 


dc.1 1,$80000000,1,$80000000 


dc.1 6,$60000000,6,$70000000 dc.1 1,5803E0000,$3E,$3E0000 ac.1 1,$80000000,1 0 
de.1 2,$70000000,0,$70000000 de.ı 53E,$51F0000,$3E,S1F0000 : 1 900000006: SSEFEE 6u0000000 
de.1 2,$60000000,6,$60000000 dce.1 $3E,S1F0000,$3E,$S1F0000 deb.1 64,0 

dc.1 6,$60000000,$E,$60000000 de.1 0,51F0000,$FC0,$1F0000 de.1 0,0,0,$3FFE0000 

dc.1 SE,$60000000, $E,$E0000000 de.1 $S3FC0,$1F0000,$7FC0,$1F0000 de.1 3,$FFFFEOO0,3,S$FFFFFCOO 
de.1 0,$C0000000,1,$C0000000 dce.1l SFFCO,S3EO0000,0,$7E0000 de.1 3,$FFFFFFOO,3,SFFFFFFCO 
de.1 1,$C0000000,1,$C0000000 de.1 3,$COFC0000,3,$1F80000 de.1 3,$E003FFFO,3,$8000FFF8 
de.1 1,$80000000,1,$80000000 dc.1 0,$3F00000,0,57E00000 dc.1 SFFFFFO,S3FFC,S3FFFFO,SFFE 
dc.1 0,0,0,$7F800000 de.ı 0,$FC00000,0,53F000000 dc.1 SFFFFO,STFE,S3FFFO,STFF 
de.1 0,$7F800000,0,$3FC00000 dcb.1 28,0 de.1 SFFFO,S3FF,0,S3FF 

de.1 0,$3FC00000,0,$3FC00000 de.1 0,0,$3E,0 dc.1 SFFFO,S3FF,S3FFFO,S7FF 
dc.1 0,$1FC00000,0,$1FE00000 de.1 $3E,0,$3E,0 de.1l SFFFFO,STFE,S3FFFFO,SFFE 


> 


Oktober/87 um 65 


EIER ER NE DE : 


dc.1 
de.1 
de.1 
dc.1 


SFFFFFO,S3FFC,1,$FFF8 

3,$E0O07FFFO,3,$FFFFFFCO 
3,$FFFFFFO0,3,$FFFFFCOO 
3,$FFFFEO00,0,$7FFCO000 


deb.1 4,0 


de.1 
de.1 
dc.1 
dc.1 
dc.ı 
dc.l 
dc.1 
de.i 
dc. 
dec.1 
dc.1 
de.1 


0,$1000,0,$200 
0,$80,0,$20 
0,$1FC00008,0,$70000004 
8,2,8,$1 

8,1,8,0 

8,0,0,0 
SFFFO,0,S3FFFO,O 
SFFFFO,1,S3FFFFO,$1 
SFFFFFO,2,0,$E0000004 
0,$1F800008,0,$20 
0,$80,0,$200 
0,$1000,0,$20000 


dcb.1 28,0 


de.l 
dc.1 
dc.1 


8,0,8,0 
8,0,8,0 
8,0,$FFFFF8,O 


dcb.1l 64,0 


dc.1 
de.l 
de.1 
de.ı 
de.1 
dc.1 
de.l 
de.i 
dc.1 
de.1 
dc.1 
ac.1 
de.1 
de.1 
dc.1 
de.l 
dc.1 
de.l 
de.1 
de.1 
dc.ı 
de.1 
dc.1 
dc.1 
dc.1 
de.ı 


0,0,0,$7FFC0000 
7,$FFFFEO00,7,$FFFFFCOO 
7,$SFFFFFFO0,7,$FFEFFFCO 
7,$C0O07FFFO,6,$FFF8 
SFFFFFO,S3FFC,S3FFFFO,SFFE 
SFFFFO,ST7FE,S3FFFO,S7FF 
SFFFO,SIFF,O,S3IFF 
SIFFFO,S3FF,STFFFO,STFF 
$IFFFFO,S7FE,S7FFFFO,SFFE 
SIFFFFFO,SIFFC,2,$FFF& 
3,$C007FFFO,3,$FFFFFFCO 
3,$FFFFFFOO,3,$SFFFFFCOO 
3,$FFFFEO00,0,S7FFCO000 
0,0,0,$80000000 

8,0,8,0 

8,0,8,0 
8,$1F80000,8,$30000 
$3000000,$4000,$C00000,$1000 
$300000,$800,$C0000,$800 
$30000,$C00,0,$400 
$1IFFFO,$400,$7FFFO,$800 
$IFFFFO,$800,$7FFFFO,$1000 
SIFFFFFO,$4000,0,$10000 
4,$F80000,4,0 

4,0,4,0 

4,0,0,$80000000 


dcb.1 28,0 


dec.1 
dc.1 
dec.1 


0,0,$80000,0 
$200000,0,$800000,0 
$2000000,0,$3FFFFCO,O 


dchb.1 64,0 


dc.1 
de.1 
de.ı 
dc. 
dc.1 
dc.l 
de.1 
dce.1 
dc.1 
de.ı 
dc. 
de.1 
dc.1 


0,0,7,$FF800000 
S1F,$SFFF80000,$1F,$FFFFOOOO 
$1F,$SFFFF8000,$1F,$FFFFEOOO 
$1C,SFFF800,$10,$3FFCOO 
SIFFFF80,SFFCOO,S7FFF80,$S3FEOO 
SIFFF8O,S1FEOO,SFFFBO, SIFFOO 
$3FF80,$FF00,0,$FFOO 
$3FF80,$FFOO,SFFF8O,SIFFOO 
SIFFF8O,SIFEOO,STFFF8O, S3FEOO 
SIFFFF80,SFFCOO,$10,$3FFCOO 
$1C,$FFF800,$S1F,$FFFFEOOO 
$ıF,$SFFFF8000,S1F,SFFFFOO00 
$ı1F,SFFF80000,7,$FF800000 


dcb.1l 4,0 


dc.1 
de.1 
dc.1 
dc.1 
de.1 
dc.i 
de.l 
de.1 
de.1 
de.1 
de.1 
dc.1 


$20,0,$60,0 

$60,0,$60,0 
$63,$FF000000,$60,$1C00000 
$6000000,$700000,$1800000,$1C0000 
$C00000, $60000,$300000, $60000 
$c0000,$30000,0,$30000 
$3FF80,$30000, $FFF80,$60000 
SIFFF80,$60000,$7FFF&O,$C0000 
$1IFFFF80,$300000,0,$C00000 
$60,$3000000,$60,0 
$60,0,$60,0 

$20,0,$18,0 


dcb.1 28,0 


de.1l 
de.ı 
de.1 


$C0000,0,$300000,0 
$C00000,0,$1800000,0 
$6000000,0,$7FFFEOO,O 


dcb.1 64,0 


dc.ı 
de.1 
de.1 
de.1 
de.1 
de.1 
dc.1 
de.1 
de.1 
dc.l 
dc.1 
de.l 
de.1ı 
de.l 
de.ı 
dc.1 
dc.1 
ac.ı 
dc.1 
dc.1ı 


0,0,3,$FC000000 
7,$FF800000,7,$FFEO0000 
7,$FFF80000,7,$FFFCOOOO 
6,$3FE0000,0,$FF0000 
$1FFEO,$S7F0000,$2FFEO,S3F8000 
$17FEO,$S1F8000,$BFEO,S1F8000 
$S5FEO,$1F8000,0,$1F8000 
$S5FEO,$1F8000,$BFEO,S1F8000 
$S17FEO,S1F8000,$2FFEO,$3F8000 
$1FFEO,S7F0000,0,$FF0000 
6,$3FE0000,7,$SFFFCOO0O0 
7,SPFFF80000,7,$FFEO0000 
7,$FF800000,3,$FC000000 
0,0,$1C,0 

$38,0,$38,0 

$38,0,$38,0 
$39,$FC000000,$3C,$7000000 
$E0000,$3800000,$50000, $1C00000 
$28000,$E00000, $14000,$E00000 
$A000,$E00000,0,$E00000 


dc.ı 
dc.1 
dce.ı 
de.1 
dce.1 
dc.1 


$5FEO,$EO0000,$BFEO,SEO0000 
$17FEO,SEO0000,$2FFEO,S1C00000 
SIFFEO,$3800000,0,$F000000 
$38,$1C000000,$38,0 
$38,0,$38,0 

$38,0,$1C,0 


dcb.1 28,0 


de.ı 
de.1 
dc.1 


$A000,0,$14000,0 
$28000,0,$50000,0 
$EO000,0,$FFFCO,O 


dcb.1 64,0 


de.1 
de.ı 
de.ı 
dc.ı 
dc.ı 
dc.ı 
de.i 
de.l 
dc.1 
dc.1 
de.1 
dc.1 
dc. 
de.ı 
de.1 
dc.1 
ac.1 
dc.ı 
dc. 
dc.ı 
dc.1 
dc. 
dc.1 
dc.1ı 
dc.1 
dc.1 


0,0,3,$FC000000 
7,$FF800000,7,$FFE00000 
7,$SFFF80000,7,$FFFCO000 
6,$3FE0000,0,$FF0000 
S1SFFEO,S7F0000,SAFFEO,S3F8000 
$S7FEO,S1F8000,$2BFEO,S1F8000 
$1SFEO,$1F8000,0,$1F8000 
S1SFEO,$S1F8000, $2BFEO,S1F8000 
$57FEO,$1F8000, $SAFFEO,S3F8000 
$1SFFEO,$7F0000,0,$FF0000 
6,$3FE0000,7,$FFFCO000 
7,SFFF80000,7,$FFEO0000 
7,$FF800000,3,$FC000000 
0,0,$3C,0 

$78,0,$78,0 

$78,0,$78,0 
$79,$FC000000,$7C,$F000000 
$A0000,$7800000, $50000, $3C00000 
$28000,$1800000,$14000,$1E00000 
$A000,$1E00000,0,$1E00000 
$S15FEO,S1E00000, $2BFEO, SIEO0000 
$57FEO,S1E00000, SAFFEO, $I3C00000 
$15FFEO,$7800000,0,$F000000 
$78,$1C000000,$78,0 

$78,0,$78,0 

$78,0,$3C,0 


dcb.1 28,0 


dc.l 
ac.1 
de. 


$A000,0,$14000,0 
$28000,0,$50000,0 
$A0000,0,$1FFFCO,O 


dcb.1 64,0 


dc.1 
dc.1 
dc.1ı 
dc.1 
dc.1 
de.1 
de.1 
de.1 
dc. 
ac.ı 
dc.1 
de.1 


0,$FE000000,1,$FF800000 
1,$FFC00000,1,$FFEO0000 
1,$FFF00000,1,$83F80000 
0,$1FC0000,$FFC,SFC0000 
$57FC,$7E0000,$2BFC,$S3E0000 
$15FC,$3E0000,$SAFC,$3E0000 
0,$3E0000, $15FC,$3E0000 
$2BFC,$3E0000,$57FC,$7E0000 
$SAFFC,$FCO0000,0,$1FC0000 
1,$83F80000,1,$FFF00000 
1,$FFE00000,1,$FFC00000 
1,$FF800000,0,SFE000000 


dcb.1 4,0 


de. 
dc.1 
de. 
dc.1 
de.1 
dc.1 
dc.ı 
de.1 
dc.1 
dc.1 
dc.l 
dc.1 


$ıF,0,$3E,0 

$3E,0,$3E,O 
$3E,0.$3E,$7C000000 
$3F,$3E000000,$1F000, $1F000000 
$A800,$F800000,$5400,$7C00000 
$2A00,$7C00000,$1500,$7C00000 
0,$7C00000,$15FC,$7C00000 
$2BFC,$7C00000,$57FC,$SF800000 
SAFFC,$1F000000,0,$3E000000 
$3E,$7C000000,$3E,0 
$3E,0,$3E,0 

S3E,0,$1F,0 


dcb.1l 28,0 


de.ı 
dc.1 
de.ı 


0,0,$A00,0 
$5400,0,$A800,0 
$15000,0,$1FFF8,0 


dcb.1 68,0 
0,$FE000000,1,$FF800000 


dc.1 


dc.1l 
dc.1 
de.1 
de.1 
de.1 
de.1 
dc.1 
dc.1ı 
dc.1 
de.1 
de.1 


1,$FFC00000,1,$FFEO0000 
1,$FFF00000,1,$83F80000 
0,S1FC0000, $FFC,SFCO000 
$57FC,$7E0000,$2BFC,$3E0000 
$15FC,$3E0000, $AFC,$3E0000 
0,$3E0000,$15FC,$3E0000 
$2BFC,$3E0000,$57FC,$7E0000 
$SAFFC,SFCO000,0,$1FC0000 
1,$83F80000,1,$FFF00000 
1,$FFEO0000,1,$FFCO0000 
1,$FF800000,0,$FE000000 


dcb.1 4,0 


de.1 
dc.1 
de.ı 
dc.1 
dc.1 
dc.ı 
de.ı 
dc.i 
dc.1 
dc.1 
de.1 
dc.1 


$1F,0,$3E,0 

$3E,0,$3E,0 
$3E,0,$3E,$7C000000 
$3F,$3E000000,$1F000,$1F000000 
$A800,$F800000,$5400,$7C00000 
$2A00,$7C00000,$1500,$7C00000 
0,$7C00000,$15FC,$7C00000 
$2BFC,$7C00000,$57FC,$F800000 
SAFFC,S1F000000,0,$3E000000 
$38,$7C000000,$3E,0 
$3E,0,$3E,0 

$3E,0,$1F,0 


dcb.1 28,0 


dc.ı 
dc.1 
dc.1 


0,0,$A00,0 
$5400,0,$A800,0 
$15000,0,$1FFF8,0 


dcb.1 68,0 


de. 
de.i 
dc.1 
de.1 
dc.ı 
de.1 
dc.ı 
dc.ı 
de.ı 
dc.1 
de.1 
dc.l 
de.1l 
dc.1 
de.ı 
ac.1 
dc.1 
de. 
dc.1 
dc.ı 
ac.ı 
dc.ı 
dc.1 
ac.ı 
dc.i 
dc.1 


7,$80000000,$F,$E0000000 
$F,$F0000000,$F,$F8000000 
$F,$FC000000,8,$7C000000 
0,$3E000000, $1FE0,$1E000000 
$2AFEO, S1E000000, $157E0,$E000000 
$AFEO,$F000000, $57E0,$7000000 
0,$F000000,$57E0,SF000000 
$AFEO,$F000000, $157E0,$E000000 
$2AFEO,S1EO00000,S1FEO, $1E000000 
0,$3E000000,8,$7C000000 
$F,SFCO00000,$F,$F8000000 
$SF,$F0000000,$F,$E0000000 
7,$80000000,0,0 

$1F8,0,$3F0,0 

$3F0,0,$3F0,0 
$3F0,0,$3F7,$80000000 
$S3FF,$C0000000,$7EO1F,$E0000000 
$15007,$E0000000, $A803,$F0000000 
$15003,$F0000000,$A803,$F8000000 
3,$F0000000, $57E3,$F0000000 
SAFE3,SFO000000,$157E3,$F0000000 
$2AFE7,SE0000000,$1FEF,$E0000000 
$3F,$Cc0000000,$7F7,$80000000 
$7F0,0,$7F0,0 

S7FO,0,57F0,0 

$3F8,0,0,0 


dcb.1 24,0 


de.ı1 
dc.1 
dc.1 
ac.1 


0,0,$A800,0 
$15000,0,$A800,0 
$15000,0,$7E000,0 
$7EFFCO,0,0,0 


dcb.1 64,0 


de.l 
de.1 
dc.1 
dc.1 
dc.ı 
de.l 
dc.1 
de.1 
de.i 
de.l 
de.1 
dc.ı 


0,0,3,0 

3,0,3,$80000000 
3,$80000000,3,$80000000 
0,$80000000,0,$C0000000 
$1C,$C0000000,$155C,$C0000000 
SAAC,$40000000, $55C,$40000000 
$2AC,$40000000,0,$40000000 
$2AC,$40000000, $55C ,$40000000 
SAAC,$40000000, $155C,$C0000000 
$1C,$C0000000,0,$C0000000 
0,$80000000,3,$80000000 
3,$80000000,3,$80000000 


E . 8 


) Oktober/87 
RN 


de.1 3,0,3,0 dc.1 $SIFFIFD,$40000000, SIFFIFE,SA0000000 de.1 $3FF,$C0000000,$7F,$80000000 


de.1 0,0,S3Fc,0 de.1 $1FFDFF,SF0000000, $1FFF00,0 dc.1 0,0,0,$70000000 
de.1 $3FC,0,$3Fc,0 dc.1 SFFCOO,0,$FFCOO,O dc.1 0,$38000000,0,$38000000 
dc.1 $S3FC,0,$3FC,0 de.1 $7FC00,0,$3FC00,0 dc.1 0,838000000,0,$38000000 
de.l $3FF,0,$3FF,0 dc.1 SIFC00,0,57800,0 dc.1 $7F,$38000000,$1C0,$78000000 
de.1 $1FE3,0,$AA3,0 dc.1 0,0,$7E0,0 dc.1 $380,$A000,$700,$14000 
dc.1 $553,$80000000,$AA3,$80000000 dc.1 $3F0,0,$3F0,0 dc.1 $E00,$28000,$E00,$50000 
de.1 $553,$80000000,SFF,$80000000 dc.1 $3F0,0,$3F0,0 dc.1 $E00,$A0000,$E00,0 
dc.1 $2AF,$80000000,$55F,$80000000 de.1 $3F0,0,$7F0,0 dc.1 SE00,$FFEO000,$E00,$FFF0000 
dc.1 SAAF,$80000000,$155F,0 dc.1 $201,$F8000000,1,550000000 dc.1 $E00,$FFD8000,$700,SFFECOOO 
dc.1 $1F,0,7,0 dc.1 2,8A0000000,5,$40000000 dc.1 $380,SFFF6000,S1E0,$2000 
de.1 SIFF,0,$3FC,0 dc.1 $A,$80000000,0,0 dc.1 $70,538000000,0,$38000000 
de.1 $3FC,0,$3FC,0 de.l $S1F5,540000000, $S1FA,SA0000000 dc.1 0,$38000000,0,$38000000 
eg S3FC,O dce.1 $1FD,$40000000, SiFE, SA0000000 RR a 
ed. . de.1 $1FF,$F0000000,0,0 - . 
de.1 $550,0,$AA0,0 de.ı $3F8,0,$3F8,0 de.1 0,$20000,0,$10000 
dc.1 $550,0,$AA0,0 dc.1l SIF8.0.S3F8.0 dc.1 0,$8000,0,$7FFC000 
de.1 $1FEO,0,S1FF8,0 dc.1l $3F8,0,$7F0,0 dcb.1 64,0 
dceb.1l 48,0 dcb.i 28,0 de.1 0,0,$3FF,$C0000000 
de.1 0,$FE000000,0,0 dc.1 $A,$80000000,5,$40000000 dc.ı S3FFF,SF0000000, $1FFFF,SF0000000 
dcb.1 12,0 dc.1 2,5A0000000,,1,350000000 dc.1 $3FFFF,$F0000000,$FFFFF,SF0000000 
ee. ren e de.1 0,$8000000,$FF,$F8000000 Fe erg nd re 
e. ‚0,870, dcb.1l 64,0 . . ‚ . 
de.1 $70,0,$70,0 ac.l 0,0.S1Fc0,0 dc.1 $FF0000,$3FFF800,$1FF0000,S3FFE000 
de.1 $40,0,$C0,0 dc.1 $7FEO,0,SFFEO,O dce.1 $1FE0000,$3FF8000,S1FE0000,0 
BE TEE na EN Se SE ra era PR SSHRER" 
e. ‚ ‚S8E, dc.1 $7F060,0,$FE000,0 e. R E ‚.S3FF 
de.1 $80,$50000000,$80,0 de.1 SFCOOF,SFCO00000,S1F800F,,$FA800000 dc.1 $7FEO00,S3FFFFOO,STFF800,$10000000 
de.1 $8E,$A8000000,$8D,$54000000 de.1 $1F000F,$F5000000, $1F000F , SEA000000 dce.1 $3FFEO0,$70000000, SFFFFF,SF0000000 
dc.1 $8E,$SA8000000,$CF,$54000000 de.1 $1F000F,SD4000000, $1F0000,0 de.ı $3FFFF,$F0000000, SiFFFF,SF0000000 
de.l SCE,SFEO00000,$C0,0 dc.1 $1F000F,$D4000000, $1F000F ,SFA800000 de.1 $3IFFF,$F0000000,$3FF,SC0000000 
dc.1 $40,0,$70,0 de.1 S1F800F,S$FD400000, SFCOOF,SFCO00000 deb.ı1 4,0 
dc.1 $70,0,$70,0 dc.1 $SFE000,0,$7F060,0 dc.1 0,$C000000,0,$C000000 
de.1 $30,0,$30,0 dc.1 S3FFEO,0,SIFFEO,O dc.1 0,$C000000,0,$C000000 
de.1 0,0,$F,$F0000000 de.1 SFFEO,0,S7FEO,O dc.1l $1FF,$8C000000,$700,$C000000 
dc.1 $F,$F0000000,$F,$F0000000 äc.1 S1FC0.0.0,0 dc.1 $1C00,5C0,$7000,$300 
dc.1 $F,$F0000000,$F,SF0000000 de.1 0,0,$3E.0 dc.1 $C000,5600,$C000,$1800 
Be BEER rent ie DE aan anaiRe Rip anbernen 
e. ; ‚$31, dc.1 $1F,0,$1F,0 e. . ‚ R 
dc.1 $72,$A8000000,871,$54000000 dc.l SFYF,O,SIF3F,O dc.1 $C000,S3FFF800,56000,S3FFFCOO 
dc.1 $72,$A8000000,$7F,$c0000000 dc.1 $S3E00,$3E00000,$7C00,$5400000 de.ı $1800, S3FFFFOO.S600,0 
de.1 $7E,$A8000000,$7D,$54000000 dc.1 $F800,$A800000,$F800,$15000000 dc.i $180,$C000000,0,$C000000 
dc.1 $7E,$A8000000,$3F,$54000000 de.1 $F800,52A000000,$F800,0 de.1 0,$C000000,0,$C000000 
$ ‚$ ‚S y 
de.1 $3E,SFEO00000,$38,0 dc.1 SF80F,SD4000000, $F80F , SFAB00000 de.1 0,$C000000,0,$38000000 
de.1 $3F,$E0000000,$F,$F0000000 de.1 $7COF,SFD400000, $3EOF ,SFC000000 dcb.1 28,0 
ae En Bene SER rkksenaagign 
©. . «SF, dc.1 $S1F,0,$1F,0 -10, „D, 
deb.1 28,0 dc.l S1F,0,$1F,0 dc.1 0,$C0,0,$FFFFCO 
dc.1 1,850000000,2,$A8000000 de.1 S3E.0.0,0 dcb.1 64,0 
dc.1 1,$54000000,0,$AA000000 deb.ı 28.0 dc.1 0,0,$FF,$F8000000 
de.1 1,0,7,$FE000000 dc.i 0,82A000000,,0,85000000 dc.1l SIFFF,SFF000000,$FFFF,SPF000000 
a a2!1 0:92500000.8,9a00ooo RR eye ae 
.1 0, .d, dc.1 7,$FFE00000,0,0 - . . ' 
ran den ca SE Karen BETT rrabns Horte 
ae.1 $F80,0,$iF80,0 de.1 0,0,$7F,580000000 &c.1 SaFFOO00.S3FFEOO. SIFFOOOO.O 
de.1 $1F80,0,53F80,0 SEEU EIER SEDDORNDO.EFFR.2C0000000 dc.1 $3FF0000,$3FFEO0.S3FF8000,S3FFF8O 
dc.1 $3880,0,57800,0 de.1 S3FFF,$C0000000,$7FFF,SC0000000 de.1 S1FF8000,$3FFFEO,SIFFCOOO.,S3FFFF8 
&e.l $707C.0.8707D. 850000000 dc.1 $FF80,$C0000000, $1FE00,0 de.1 SFFFO00,S3FFFFE,S7FFCOO,$1000000 
de.1 $607A,$A0000000,8607D,850000000 de ;1 $1PC90,BPEE0000, 837800 ,SFFEAOOD de.1 S3FFF80,$F000000,SFFFFF,SFFO00000 
dc.1 $607A,$A0000000,$6000,0 Bea ea Ener 62.500, SFFR8D0O dc.1l SI3FFFF,SFFO00000,S$FFFF,SFF000000 
de.1 $607A,$A0000000,$607D, 850000000 0+1',83E000,8PE 28000; dc. $IFFF,SFF000000,$FF,$F8000000 
dc.1 $607E, $A0000000, 87070, 850000000 g2:3 BSEDERLBEE RED 627000, SEEASAED dcb.1 4,0 
x i Y dc.1 $3F000,$FFD4000,$3F800,SFFEAO00 
dc.1 $707E,$F8000000,$7800,0 dc.1 0,5800000,0,$800000 
dc.1 $3880,0,$3F80,0 da>181PC0Q,SEERODOSFSIERNO.O dc.1 0,$800000,0,$800000 
dc.1 S1F80,0,$1F80,0 ac.1 EFF&D.BEO0DOUOU.STEFF 800000000 dc.1 $7F,SF0800000,$200, 86800000 
dc.1 SF80,0,8700,0. dc.1 $3FFF,SC0000000,$FFF,SC0000000 dc.1 S800,$1800001.32000.84 
dc.1 0,0,5FR.0 de.1 $3FF,$C0000000,$7P,580000000 dc. $4000,$10,84000,540 
de.1 $7F,0,$7F,0 de:1 0,0.0,878000000 de.1 $8000,$100,$8000,0 
Ba* dc.1 0,$3C000000,0,$3C000000 
de.1 $7F,0,$7F,0 dc.1 $8000,S3FFE00,$4000, SIFFFSO 
dc.1 $77F,0,$7FC,0 dc.1 0.53C000000,0,53C000000 dc.1 $4000,$3FFFEO,$2000,S3FFFF8 
dc.1 SF83,$F8000000,$F82,5A8000000 ac.1 $7F,$3C000000 ,$1E0,$7C000000 dc.1 $800,$3FFFFE,S200,0° 
dc.1 $1F85,$50000000,$1F82,$A0000000 de.1 $3C0,$F000,5780,$14000 ac.1 $40,$800000,0,8800000 
dc.1 $1F85,$40000000,S1FFO,0 de.ı 5F00,528000,5F00,550000 de.1 0,$800000,0,3800000 
dc.1 SIFFA, SA0000000.S1FFD.$50000000 dc.1 $F00,$A0000, $F00,0 de.1 0,5800000,0,$4000000 
dc.1 $IFFE, SA0000000,$FFD,$50000000 de.1 SF00,$FF50000,5F00,$FFA8000 dcb.1 28,0 
6 ® s de.1 $F00,SFFD4000,$780,$FFEA000 
dc.1 SFFE,SF8000000,$7C0,0 dc.1 0,0,0,840 
dc.1 S7IF.0,$7F,0 de.1 $3C0,$FFF0000,$1E0,0 de.1 0.810.0,84 
de.1l S7F,0 SIF,o de.1 $70,$3C000000,0,$3C000000 de.l 0.1,0.SFEFFF 
act STF.O.SFE.O de.1 0,$3C000000,0,$3C000000 666.3 12,0 
deb.1 28.0 dc.1 0,$3C000000,0,$78000000 REBELLEN ER 3 
ES, 0000, 000 dcb.1 28,0 
en 1 "880000000: 2. kasoooano @c.1 0,5A0000,0,550000 EmoR 0,2 
de.1 1,0,53F,$F8000000 ac.1 0,528000,0,514000 Screen: as.ı 1 
deb.1 24,0 BR ET IRGETEBENNG Scereeni: ds.11 
dc.1 $7800,0,$F800,0 eb. ; : as. 
. Sırcoo.0.S1F800,0 de.1 0,$A0000,0,$50000 Peru “+1 ı 
dc.1 $3F000,0,$3F000,0 dc.1 0,$8000,0,$4000 work_scrl: as.ı 1 
dc.1 $7F000,0,$3F000,0 ee ie show_serl: ds.11 
.1 $3F000,0, Y : . : 3 
21 gar00o TR dc.1 0,0,57F, 580000000 age: ir : ı 
de.1 S1FCOO, $F0000000,$FF00,0 ac.1 $3FF,$C0000000,$FFF,SC0000000 work: a TT 
01 038005000 . ’ dc.1 SIFFF,SC0000000,$7FFF,SC0000000 » i = 
EL ae dc.1 $FF80,$C0000000,$1FE00,0 air ospaes Nase 
£ de.1 $1FC00,$FFF4000,$3F800, $SFFESO00 Pr z E 
dc.1 0,0,$7800,0 dosbase: ds.11 
de.1 $3F000,$FFD0000,$3F000,SFFAO000 } 
de.1 $S1FC00,0,$3FC00,0 gfxbase: ds.ı 1 
dc.1 $3F000,$FF40000,$3F000,0 £ 
de.1 $S7FC00,0,$FFC00,0 vblcount: as.ı1 1 
de.1 SFFCO0,0,S1FF800,0 de.1 $3F000,$FFEO000,$3F000,SFFFO000 “ 
‚ äc.1 S3F000,$FFD8000,$3F800,SFFECOOO : 
dc.l SIFFDFE,0,SIFFIFE, $A0000000 x: ds.wi1 
dc.1 $1FC00,$FFF6000,S1FE00,$2000 ; 
dce.1 $IFFIFD,$40000000,$3FFLFA, $A0000000 y: ds.w 1 
dc.1 SFF80,$C0000000,$7FFF,$C0000000 h : 
de.1 S3FF1F5,$40000000,$3FF000,0 =? sprite_tab: as.1 33 
de.1 $3FFIFS,$40000000, S3FFLFA, $A0000000 e.1 S3FFF,$C0000000, $FFF,$C0000000 END 


„Como“ erzeugt Objektbewegungen auf dem Screen 
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WIE EEENIENTER UN SEN, 


as Programm deckt 

vier verschiedene Be- 
reiche ab: 
— Schnelles Formatieren 
— Diskettennamen und ID ändern 

— Einzelne Spuren reparieren 

— Diskette gegen Raubkopierer 
schützen. 

Nach dem Start mit RUN befindet 
man sich im Hauptmenü. Durch Drük- 
ken der Zifferntasten (1-8) gelangt 
man in die entsprechenden Unterme- 
nüs: 


1 — Spur x bis y formatieren 

Dieser Programmpunkt dient zum 
normalen Formatieren von Disketten, 
sowie zum gezielten Formatieren ein- 
zelner Spuren oder Spurbereiche. 
Schadhafte Spuren lassen sich somit 
wieder reparieren, ohne daß die Daten 
der gesamten Diskette verloren gehen. 
Abgefragt wird, welcher Spurbereich 
zu formatieren ist (im Normalfall 1- 
35) und welches ID die Diskette be- 
kommen soll. Das vollständige For- 
matieren einer Diskette dauert etwa 10 
Sekunden. Es lassen sich auch mehr 
als 35 Spuren formatieren. Die Grenze 
liegt jedoch bei zirka 40 Spuren, da 
sonst der Schreib-/Lesekopf der Flop- 
py gegen einen nicht vorgesehenen An- 
schlag fährt und somit die Gefahr der 
Dejustierung besteht. Die Lage dieser 
„inneren“ Grenze ist von Laufwerk zu 
Laufwerk — wegen Fertigungstoleran- 
zen — unterschiedlich. 


2 — Spur x-y mit n Sektoren 
formatieren. 

Diese Funktion ist zum Erstellen eines 
einfachen Kopierschutzes geeignet. 
Die Eingabeparameter sind die glei- 
chen wie beim normalen Formatieren, 
es muß jedoch zusätzlich die Anzahl 
der Sektoren pro Spur angegeben wer- 
den. Im Normalfall haben die einzel- 
nen Spuren aufgrund ihrer von außen 
nach innen abnehmenden Länge un- 
terschiedlich viele Sektoren: 


Spur 1 — 17: 21 Sektoren 
Spur 18 — 24: 19 Sektoren 
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N ER 


Ce eoa usrıng 


„Spurformat“ formatiert 
einzelne Spuren und Sektoren 
einer Diskette mit verschiedenen 
Formaten und zeigt dabei den 
meisten Raub-Kopierprogrammen 
eine lange Nase. 


Spur 25 — 30: 18 Sektoren 

Spur 31 — 35: 17 Sektoren 

Der Trick des Kopierschutzes ist nun, 
daß die Spur I mit 22 Sektoren forma- 
tiert wird (Sektor 0-21). Wegen der 
entstehenden Überlänge dieser Spur 
wird der Anfang von Sektor 0 ge- 
löscht. Das Laufwerk wird bei dem 
Versuch diesen Sektor zu lesen, schei- 
tern und mit der Fehlermeldung „20, 
READ ERROR, 01, 00“ den Lesevor- 
gang abbrechen. Diese Fehlermeldung 
muß im Programm abgefragt werden. 
Tritt sie nicht auf, so handelt es sich 
logischerweise um eine Kopie des Ori- 
ginals. In dem zusätzlich gewonnenen 
Sektor, der normal nicht angespro- 
chen werden kann, lassen sich wichtige 
Teile eines Programms unterbringen 
(Codewort, EX-OR-Schlüssel, oder 
ähnliches). Da die meisten Kopierpro- 
gramme nicht nach solchen versteck- 
ten Blöcken suchen, stellt diese Me- 
thode ein wirkungsvolles Kopier- 
schutzverfahren dar. 


3 — Spur x spezialformatieren 

Dieser Programmpunkt ist nur für 
Halbprofis sinnvoll, die sich mit der 
Arbeitsweise und dem Diskettenfor- 
mat der Floppy auskennen. Es ist 
möglich, alle Parameter jedes Block- 
headers einer Spur zu bestimmen. Ein 
Beispiel eines wirkungsvollen Kopier- 
schutzes, der sich hier erstellen läßt, 
wären sogenannte Füll-Bytes, die nicht 
abgefragt werden und in keiner Prüf- 
summe erscheinen. 


4 — BAM erzeugen 
Mit dieser Funktion wird die Block- 
Availability-Map (BAM) generiert. 


UF DEN TRACK GEKOMMEN 


Als Parameter ist der Diskettenname 
einzugeben. Diese Funktion muß nach 
jedem Formatierungsprozeß, der die 
Spur 18 betrifft, ausgeführt werden, 
da das Direktory, daß sich dort befin- 
det, beim Formatieren dieser Spur ge- 
löscht wird. 


5 — Name und ID wechseln 


Hier lassen sich Name und ID der Dis- 
kette wechseln, ohne daß Daten verlo- 
rengehen. 


6 — Diskbefehle senden 


Bei diesem Menüpunkt lassen sich die 
DOS-Befehle nutzen, um einzelne 
Files zu bearbeiten. 


7 — Directory 
8 — Ende 
Abtipphinweis 


„Spurformat“ ist als Hexdump-Listing 
abgedruckt, das sich nur mit dem 
Checker eingeben läßt. Als Startadres- 
se ist 0801 anzugeben. Zu beachten ist, 
daß das Basicprogramm, welches nach 
dem Laden des Files zum Vorschein 
kommt, nicht verändert werden darf, 
da sonst die SYS-Befehle in dem Pro- 
gramm nicht mehr korrekt ausgeführt 
werden. 

(K. Burkert) oO 


Dies ist das korrekte Listing 
von „Spurformat“, mit der 
Bitte um Entschuldigung an 
diejenigen, die dieses Pro- 
gramm aus dem RUN-Son- 
derheft 1/87 abgetippt ha- 
ben und feststellen mußten, 
daß es fehlerhaft abgedruckt 
war. 


System: C64/Floppy 


Art: Utility 
Sprache: Basic/ Assembler 


Programmname: Spurformat 


0801 19,08,28,23,396,35,43,4b, de 
8809 28,58,29,b2,43,4b,af,a8, 47 
0811 58,b0,38,43,4b,aFf,58,00, ®1 
0819 31,08,Ff2,03,97,35,33,32, 7a 
0821 38,30,2c,31,34,38,97,35, SE 
0829 33,32,38,31,2c,31,34,00, 37 
0831 69,08,fc,03,99,c7,28,38, ib 
0835 29,c7,28,31,34,29,22,05, 82 
0841 S3,1d,1d,d3,d0,d5,d2,2d, 60 
8849 c6,cf,d2,cd,c1,d4,290,56, b3 
0851 32,28,32,20,20,46,55,45, 88 
88553 52,20,c3,2d,36,34,2f,d6, 23 
0861 c3,2d,31,35,34,31,22,00, b7 
0669 96,08,06,04,99,22,1d,1d, 86 
0871 b7,b7,57,b7,b7,b7,b7,b7, 808 
0873 b7,b7,b7,b7,b7,b7,b7,b7, ®®8 
0881 b7,b7,b7,b7,b7,b7,b7,b7, 080 
0889 b7,b7,b7,b7,b7,b7,b7,b7, ®8 
0891 b7,b7,b7,22,00,be,08,10, d® 
8839 04,99,22,1d,1d,1d,1d,id, 71 
0Bal 1d,1d,28,c3,29,20,31,39, 67 
08a5 38,35,20,42,59,28,cb,4c, 39 
86b1 41,55,53,20,c2,55,52,4b, 33 
08b3 45,52,54,22,008,e3,08,1a, 31 
08c1 04,99,22,1Ff,11,11,12,31, SO 
86c9 92,2e,2e,2e,d3,50,55,52, e3 
08d1 20,58,2d,59,20,46,4Ff,52, 74 
8849 4d,41,54,49,45,52,45,4e, 01 
OBel 22,00,12,09,24,04,99,22, c2 
88eS 11,12,32,92,2e,2e,2e,d3, fb 
o8f1 50,55,52,20,58,2d,59,20, 31 
BBFS 4d,49,54,20,48,20,d3,45, £3 
0901 4b,54,28,20,46,4f,52,4d, 91 
8993 41,54,49,45,52,45,4e,22, 2a 
0311 00,3b,09,28,04,99,22,11, 1d 
8519 12,33,92,2e,2e,28,d3,5®, c5 
09321 55,52,20,58,20,53,50,45, a4 
0929 5a,49,41,4c,2d,46,4F,52, ea 
0331 4d,41,54,49,45,52,45,4e, 01 
09339 22,00,56,09,38,04,99,22, 19 
0341 11,12,34,92,2e,2e,2e,c2, ®e 
0343 c1,cd,20,45,52,53,45,55, b7? 
0951 47,45,4e,22,00,79,09,42, 7d 
08359 04,99,22,11,12,35,92,2e, be 
0961 Ze,2e,ce,c1,cd,c5,20,55, e® 
8369 “He,44,20,c9,c4,20,57,45, 17 
0371 43,48,53,45,4c,4e,22,00, 23 
0379 9b,09,4c,04,99,22,11,12, 4 
0981 36,92 ,2e,2e,2e,c4,49,53, 085 
0989 “4b,2d,c2,45,46,45,4B,“4c, 98 
0991 45,20,53,45,4e ,44,45,43e, 34 
0399 22,00,63,09,56,04,99,22, 34 
09al 11,12,37,92,2e,2e,2e,c4, Of 
8989 49,52,45,43,54,4f,52,59, £7 
85b1 22,00,c6,09,60,04,99,22, bi 
03b3 11,12,38,92,2Ze,2e,2e,c5, 9F 
09c1 “e,44,45,22,00,e7,09,6a, e6 
05cC3 94,85,22,121,11,99,.c2,49, 82 
0941 54,54,45,20,57,41,45,4B, 38 
0949 “4c,45,4e,20,20,38,9d4,9d, 1d 
09e1 3d4,22,3b,41,24,00,Ffe,29, 8d 
0989 74,904,8b6,c5,28,41,24,29, 18 
09Ff1 b3,31,b0,c5,28,41,24,29, 4F 
89F9 b1,38,a7,8a,00,2c,0a,7e, F6 
@a01 04,91,c5,28,41,24,29,89, cd 
0389 31,31,37,30,2c,31,32,30, 04 
Ball 30,2c,31,38,37,39,2c,31, E£ 
0a19 33,38,30,2c,31,34,35,30, ®1 
Ba2l 2c,31,37,36,30,20c,31,37, fa 
Ba29 32,30,00,37,04,88,04,99, b9 
0831 22,93,22,38,80,00,60,0a, 4d 
8a39 92,04,99,22,1f,93,11,1d, 85 
®a41 1d,1d,1d,i1d,1d,id,id,i1d, 08 
®a49 1d,d3,50,55,52,20,58,2d, a3 


BaSıl 
0353 
Ba6l 
Ba63 
0=71 
08379 
Oası 
0383 
0aS1 
08393 
Baal 
Oaa3 
Babl 
BabS 
Bacı 
dac9 
Badı 
BadS 
Basel 
Bae3 
Bafıi 
Dafs 
0b81 
0b23 
®b11 
8b19 
ob21 
0b23 
0b31 
0633 
@b41 
8b49 
0b51 
0659 
®b61 
8bE3 
0b71 
0673 
0b81 
0b8B3 
0b31 
0b39 
Obal 
Oba3 
®bb1 
8bbS 
®bc1 
8bc3 
Obdi 
ObdS 
Obel 
®be3 
Obf1 
ObF9 
2c01 
8c83 
8c11 
0c13 
®c21 
8c23 
8c31 
2c39 
OcH1 
8c43 
0c51 
0c59 
Oc6l 
8c63 
0c71 
0c79 
OcB1 
8c89 
0c31 
0c99 
®cal 
Oca39 
Ocbl 
8cb9 
®ccel 
8cc3 
Ocdi 
8cd3 
Ocel 
®ce3 
Bcfl 


Oc£3 


5s3,20,46,4f ‚52,44 ,41,54%, 
49,45,52,45,4e,22,00,87, 
03,9c,04,99,22,1d,1d,1d, 
id,id,id,id,id,1d,1d,b7, 
b7,b7,b7,b7,b7,b7,b7,b7, 
b7,b7,b7,b7,b7,b7,b7,b7, 
b7,b7,b7,39,22,80,37,0a, 
a6,04,9e,35,34,38,36,3a, 
893,31,32,36,30,20,c6,0a, 
b9,04,39,22,1F,93,11,1d, 
1d,1d,1d,d3,50,55,52,20, 
58,2d,593,280,44,49,54,20, 
4e,20,d3,45,4b,54,2e,20, 
46,4f,52,44,41,54, 49,35, 
S2,45,4e,22,00,f3,0a,ba, 
04,99,22,1d,1d,1d,1d,b7, 
b7,b7,b7,b7,b7,b7,b7,b7, 
b7,b7,b7,b7,b7,b7,b7,b7, 
b7,b7,b7,b7,b7,b7,b7,b7, 
b7,b7,b7,b7,b7,b7,b7,99, 
22,00,Ffd,03,c4,84,9e,35, 
34,38,36,00,38,0b,ce,®4, 
y2,24,b2,22,22,38,85,22, 
11,c1,4e,538,41,48,4c,20, 
d3,45,4b,54,4f,52,45,4e, 
20,20,20,20,9d4,9d4,94,3d, 
22,3b,42,24,3a,42,b2,c5, 
28,c8,28,42,24,aa,22,a0, 
a0,22,20,32,29,29,00,53, 
0b,d8,04,8b,42,b3,31,b®, 
42,b1,32,35,a7,99,22,91, 
91,91,22,38,89,31,32,33, 
30,00,83,0b,e2,04,3Ff,31, 
2ec,38,2c,31,35,38,98,31, 
2c,22,44,28,57,22,C7,88, 
31,33,29,C7,28,37,89,c7, 
28,32,29,c7,28,32,30,31, 
29,c7,28,42,29,3b,3a,a0, 
31,00,b7,0b,ec,04,53,24, 
b2,22,22,38,85,22,11,56, 
4f,4e,20,d3,50,55,52,20, 
20,208,31,94,9d,3d,22,3b, 
53,24,38,53,56,b2,c5,28, 
c8,28,53,24,aa,22,80,a8, 
22,2c,32,29,29,00,ce,®b, 
£6,04,86,53,56,b3,31,a7, 
99,28,91,91,91,22, 38,89, 
31,32,36,30,00,04,0c,00, 
05,53,24,b2,22,22,3a,85, 
22,11,42,49,53,20,d3,50, 
55,52,20,20,20,33,35,9d, 
94,9d,94,22,3b,53,24,3a, 
53,42,b2,c5,28,c8,28,53, 
E4,aa,22,a0,30,22,2c,32, 
293,29,00,1b,0c,04,05,8b, 
53,42,63,31,a7,99,22,31, 
931,91,22,38,83,31,32,38, 
30,80,3c,0c,14,05,85,22, 
11,c9,c4,22,36,49,44, 24, 
3a,49,44,24,b2,cB,28,43, 
44,24,aa,22,20,a0,22,2c, 
32,293,88,48,0c,1e,05,3fF, 
31,2c,38,2c,31,35,00,68, 
0c,28,05,98,31,2c,22,4d, 
2d,57,22,07,28,33,34,29, 
c7,28,36,29,c7,28,31,29, 
c7,28,53,56,29,3b6,00,88, 
8c,32,085,88,31,2c,22,4d, 
2d,57,22,c7,28,36,33,29, 
c7,28,36,29,c7,28,31,289, 
c7,28,53,42,29,3b,00,a6, 
8c,3c,805,98,31,2c,22,4d, 
2d,57,22,c7,28,31,38,29, 
c7,28,30,29,c7,28,32,29, 
49,44,24,3b,20,bc,0c,46, 
05,98,31,2c,22,4d,2d,45, 
22,07,28,30,29,c7,28,36, 
23,3b,00,c3,2c,50,05,a2, 
31,20,cd,8c,53,05,89,31, 
38,34,30,00,F2,0c,64,05, 
39,22.10,93:37,14.19, Tq, 
id,id,1d,id,iId,1d,1d,id, 
1d,id,1d,c2,c1,cd,20,45, 
52,58,45,55,47,45 Me,22, 
00,15,0d,6e,05,39,22,1d, 
id,id,id,id,1d,i1d,id,id, 


0d®1 1d,1d,1d,1d,1d,b7,b7,b7, 66 
0408 b7,b7,b7,b7,b7,b7,b7,b7, 08 
@d11 b7,99,22,900,47,2d4,78,05, ed 
8d19 85,22,11,ce,c1,cd,c5,22, 3d 
0d21 3b,4e,41,24,3a,4e,41,24, 13 
0423 b2,cB,28,4e,41,24,aa,22, 69 
0431 a®d,a0,a0,a0,30,a0,a0,ad, 09 
0433 a2,20,30,20,30,a0,20,a0, 09 
Od41 22,2C,31,36,29,00,57,0d, 64 
0d49 82,05,3f,31,2c,38,2c,31, d9 
0d51 35,2c,22,49,22,00,61,0d, 58 
0459 8c,05,9e,36,31,35,37,08, 21 
®d61 71,24,96,95,98,31,2c,22, 65 
0469 55,33,3a,22,4e,41,24,00, 6b 
0471 7b,0d,a0,05,89,31,38,31, 67 
0473 30,00,24,0d,a8,05,39,22, el 
0d81 1F,93,11,1d,1d,1d,i1d,1d, 81 
0489 1d,1d,id,id,1d,ce,ci,cd, 43 
0dS1 c5,20,55,“4e,44,20,c9,c4, d4 
0d33 20,57,45,43,48,53,45,4c, b93 
Odal 4He,22,00,cb,2d,b4,05,399, 28 
@daS 22,1d,1d,id,1d,1d,lId,id, 05 
Odb1 1d,1d,1d,b7,b7,b7,b7,b7, 66 
@dbS b7,b7,b7,b7,b7,b7,b7,b7, 08 
@dc1 b7,b7,b7,b7,b7,b7,b7,39, le 
2dc9 22,20,db,0d,be,05,9f,31, 15 
@dd1 2c,38,2c,31,35,2c,22,49, di 
8ddS 22,00,ea,04,c8,05,9Ff,38, 27 
@del 2c,38,2c,38,2c,22,23,22, £3 
OdeS 22, Ff,0d4,d2,05,98,31,2c, bi 
@df1 22,55,31,38,38,20,30,20, ec 
OdfS 31,38,28,30,22,00,12,0e, Of 
0e0d1 dc,25,98,31,2c,22,42,2d, Sc 
de03 50,38,38,20,31,34,34,22, 3d 
dell 00,27,0e,e6,05,99,22,11, 88 
Be1S 1d,i1d,1d,1d,i1d,1d,22,c7, 5b 
de21 28,33,34,29,3b,00,33,0e, 60 
Be23 f0,05,81,49,b2,31,84,31, 15 
de31 36,00,43,0e,fa,05,a1,23, dc 
de33 38,2c,41,24,38,99,41,24, e7 
Be4l1 3b,00,4a,0e,04,06,82,49, ae 
deH9 080,58,0e,0e,06,39,c7,28, b5 
8eS51 33,34,29,22,91,22,00,68, 2d 
0e53 Be,18,06,85,22,ce,ci,cd, c® 
0861 c5,22,3b,4e,41,24,00,7b, 32 
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de83 36,86,98,31,2c,22,42,2d, b6 
0891 50,38,38,20,31,36,32,22, 39 
de33 008,ad,de,40,06,39,22,11, al 
Geal 1d,1d,1d,1d,22,c7,28,33, 51 
Oea9 34,29,3b,08,b8,2de,4a,06, 33 
Bebl 81,49,b2,31,a4,35,00,c8, 5F 
debS ®e,54,06,21,23,38,2c,41, F6 
Beci 24,38,99,41,24,3b,908,cf, Sc 
dec3 Be,5e,06,82,49,00,dd,Be, 4c 
Oedi1 68,06,99,c7,28,33,34,29, 34 
BedS 22,91,22,00,eb,0e,72,06, Fb 
deel 85,22,c9,c4,22,3b,49,44, 54 
BeeS 24,00,fe,de,7c,06,38,31, ef 
Befl 2c,22,42,2d,50,33,38,20, 4d 
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0F01 06,98,38,2c,49,44,24,3b, 69 
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orF11 22,55,32,38,38,20,30,20, ed 
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Ofal 1d,1d,1d,1d,1d,c4,49,53, 59 
OfaS 4b,2d,c2,45,46,45,48,4c, 38 


EEE FENTER NEE, 


Oktober/87 Xu 69 


OFfb1 
OFb3 
Ofci 
ofc9 
BFdi1 
oFfds 
öfel 
öFfeS 
BFEI 
BrFfs 
1891 
1093 
1011 
19019 
1021 
1023 
1031 
1839 
1941 
1949 
1851 
19059 
1961 
1863 
1071 
1979 
1081 
1083 
1031 
1099 
10al 
1039 
18b1 
18b3 
10c1 
18c3 
10d1 
1049 
10del 
10e3 
10F1 
19F3 
1191 
1109 
1111 
1119 
1121 
1129 
1131 
1138 
1141 
1149 
1151 
1159 
1161 
1169 
1171 
1179 
1181 
1189 
1191 
1199 
1lal 
11a9 
11b1 
11b9 
11c1 
11c9 
11dı 
11d9 
1lel 
11e9 
11Ff1 
1169 
1201 
1209 
ı211 
1219 
1221 
1229 
1231 
1239 
1241 
1249 
1251 
1259 


45,20,53,45,4e,44,45,He, 
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1d,1d,b7,b7,b7,b7,b7,b7, 
b7,b7,b7,b7,b7,b7,b7,b7, 
b7,b7,b7,b7,b7,99,22,00, 
Fe,0f,f4,06,99,22,11,1d, 
id,i1d,1d,1d,1d,1d,1d,1d, 
BE.DY,EB,33,34,69,38,99, 
22,91,91,22,00,19,10,Fe, 
06,85,22,c2,45,46,45,48, 
4c,20,20,20,1d,49,9d,9d, 
94,9d,22,3b,42,45,24,00, 
29,10,08,07,9F,31,2c,38, 
26,31,35,26,42,35, 24,08; 
38,10,12,07,a0,31,3a,3f, 
31,2c,38,2c,31,35,00,4e, 
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81,18,380,97,99,22,11,3f, 
54,41,53,54,45,20,44,52, 
55,45,43,4b,45,4e,22,00, 
9a,10,38,07,97,31,39,38, 
ec,30,33,92,31,39,38,2c, 
31,33,97,31,39,38,2c,30, 
00,30,10,44,07,88,080,cc, 
30.48,07.99,22,1F,33,11, 
id,id,1d,id,id,1d,1d,d3, 
590,55,52,20,58,20,53,50, 
45,58,49,41,4c,20,46,4f, 
52 ,4d,41,59,49,45,52,95, 
4e,22,08,£6,10,58,07,39, 
22,1d,1d,1d,id,i1d,1d,1d, 
b7,b7,b7,b7,b7,b7,b7,b7, 
b7,b7,b7,b7,b7,b7,b7,b7, 
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43,48,45,20,d3,50,55,52, 
22,36,53,50,24,3a,53,50, 
b2,c5,28,53,50,24,aa,c7, 
28,30,29,29,00,2d,11,6c, 
07,86,53,50,b3,31,a7,31, 
38,37,30,088,37,11,76,07, 
42,4c,b2,32,31,00,48,11, 
80,07,8b6,53,50,b1,31,37, 
a7,42,4c,b2,31,39,00,59, 
11,88,07,8b6,53,50,b1,32, 
34,37,42,4c,b2,31,38,00, 
68,11,94,27,86,53,50,bl, 
33, 30,87 ,42,40,b2,31,37, 
00,7b,11,9e8,07,8b,53,50, 
51,39,35,87,42,4c,b2,31, 
37,00,65,11,38,07,39,22, 
22,11,57.49,.45,56.49,.45, 
20,45,0290,03,45,4b,54,4F, 
52,45,4e,20,22,42,4c,22, 
9d,9d4,94,9d4,9d,22,3b,3a, 
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c5,2B,42,4c,24,aa,c7,2B, 
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8b,42,4c,b3,31,b®,42,4c, 
b1,32,35,37,31,38,37,30, 
00,ed,11,bc,07,49,31,b2, 
31,36,30,3a,49,32,b2,31, 
36,30,3a,48,45,24,b2,22, 
22,3a,81,53,b2,30,a4,42, 
4c,ab,31,00,0b,12,c6,07, 
99,22,93,1f,d3,50,55,52, 
22,53,50,22,20,20,c2,“4c, 
4 .43,45,28,59,22,31,11;, 
22,00,38,12,d0,07,85,22, 
6c8,25;41,34,45,52 ,Ed,ch, 
45,4e,4e,55,4e,47,20,20, 
38,9d,9d,9d,22,3b,48,4b, 
24,3a,48,4b,b2,c5,28,4B, 
Y4b,24,a3,c7,28,30,29,29, 
00,5c,12,da,07,99,22,d3, 
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53,45, 24, 38,53,45,h2,05, 
28,53,45,24,aa,c7,28,30, 
29,29,00,56,12,2e,07,39, 
e2,43,50,55,52,292,22,53, 
50,22,3d,94,9d,9d,22,3b, 
33,8b6,53,50,b1,39,a7,99, 
22,9d,22,3b,00,ae,12,f8, 
07,85,54,52,24,3a,54,52, 
b2,c5,28,54,52,24,aa,c7, 
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1249 
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12e3 
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1301 
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1311 
1319 
1321 
1329 
1331 
1339 
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1351 
1359 
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1369 
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1379 
1381 
1389 
1391 
1393 
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1389 
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13b9 
13c1 
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13d1 
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13e1 
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1493 
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1419 
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1439 
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1469 
1471 
1479 
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14e9 
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08,939,22,c9,c4,20,31,20, 
22,49,31,02,94,94,94,9d, 
B2L,35,38;86,49,31,61,39; 
87,99,22,9d4,22,3b,00,el, 
12,0c,08,8b6,49,31,b1,39, 
39,a7,99,22,9d4,22,3b,00, 
£9,12,16,08,85,49,31,24, 
34,49,31,b2,05;28,39531, 
©4,aa3,c7,28,30,29,29,00, 
1b,13,20,08,99,22,c9,cH, 
20,32,20,22,49,32,22,9d, 
94,3d4,9d,22,3b,3a,8b,43, 
32,b1,39,87,99,22,9d,22, 
36,00,2c,13,2a4,08,8b,49, 
32,01,39,39,37,99,22,38, 
22,3b,00,44,13,34,08,85, 
49.,32,04,38,149,32,b2,c5; 
28,49,32,24,aa,c7,28,30, 
29,29,00,72,13,3e,08,85, 
@2,c6,55,45,4c,40, 42,59, 
54,45,20,31,20,20,31,35, 
94,94,9d4,9d,22,3b,46,31, 
24,38,46,31,b2,c5,28,46, 
31,24,a8,c7,28,30,29,23, 
00,80,13,48,08,85,22,c6, 
S5,45,4c,4c,42,59,54,45, 
20,32,20,20,31,35,9d,9d, 
94,9d,22,3b,46,32,24,3a, 
46,32,b2,c5,28,46,32,24, 
88,c7,28,30,29,29,00,e6, 
13,52,08,8b,48,4b,b3,30, 
b®,48,4b,b1,32,35,35,b®, 
53,45,b3,30,b0,53,45,bl, 
32,35,35,b80,54,52,b3,30, 
b0,54,52:b1,30,35,35,b9, 
49,31,b6b3,30,b®,49,31,bl, 
32,35,35,b0,49,32,b3,30, 
b9,49,32,61,32,35,35,a7, 
31,39,39,30,00,1b,14,5c, 
08,43,4b,b2,30,3a,43,4b, 
b2,35,43,4b,28,53,45,29, 
3a,43,4b,b2,a5,43,4b,28B, 
54,52,29,33,43,4b,b2,a5, 
43,46b,28,49,31,29,3a,43, 
4b,b2,a5,43,4b,28,49,32, 
29,00,43,14,66,08,99,22, 
do,52,55,45,46,53,55,4d, 
4d,45,20,22,43,4b,22,9d, 
94,94,9d,22,3b,3a,8b,43, 
4b,b1,39,37,39,22,9d4,22, 
3b,08,54,14,70,08,8b,43, 
4b,b1,39,39,87,39,22,3d, 
22,3b,00,6c,14,73,08,65, 
43,4b,24,3a,43,4b,b2,c5, 
28,43,4b,24,a3,c7,28,3®, 
29,29,00,82,14,84,08,8b, 
43,4b,b3,30,b0,43,4b,bl, 
32,35,35,87,31,39,39,30, 
00,36,14,8e,08,48,45,24, 
b2,48,45,24,a8,c7,28,48, 
45,29,38,c7,28,43,4b,29, 
aa,c7,28,53,45,29,aa,c7, 
28,54,52,29,00,ca,14,98, 
08,48,45,24,b2,48,45,24, 
a8,c7,28,49,32,29,aa,c7, 
28,49,31,29,88,c7,28,46, 
31,29,a8,c7,28,46,32,29, 
00,d1,14,a2,08,82,53,00, 
01,15,ac,08,9f,31,2c,38, 
2c,31,35,38,9f,32,2c,38, 
2c,32,2c,22,23,30,22,3a, 
98,31,2c,22,42,2d,50,3a, 
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2c,22,4d,2d,57,22,c7,08, 
33,34,29,c7,€8,36,289,c67, 
28,31,29,c7,28,53,50,25, 
00,4a,15,ca,08,98,31,2c, 
22,4d,2d,57,22,c7,28,31, 
38,36,29,c7,28,36,29,c7, 
28,31,29,c7,28,42,4c,28, 
00,5f,15,d4,08,98,31,2c, 
22,4d,2d,45,22,c7,28,30, 
29,c7,28,36,29,00,6c,15, 
de,08,a0,31,33,89,31,38, 
34,30,00,00,00,29,00,20, 
bd,Ff,a9,0f,a8,32,08,20, 
ba,ff,20,c0,ff,a9,00,85, 
fb,a9,06,85,fc,a9,ea,85, 
£d,39,15,85,fe,a2,0f,20, 
c9,ff,a9,4d,20,d2,Fff,aS, 
2d,20,d2,ff,a9,57,20,d2, 
Ff,a5,fb,20,d2,ff,a5,fc, 
2o,d2,Ff,a9,20,20,d2,Fff, 
a0,00,b1,fd,20,d2,ff,c8, 
c8,20,30,£6,20,cc,ff,18, 
a5,£fd,69,29,85,fd,a5,fe, 
69,00,85,fe,18,a5,fb,68, 
20,85,fb,a5,fc,69,00,85, 
£fc,c9,07,d0,b8,85,fb,c9, 
c0,dd,aa,39,0f,20,c3,ff, 
60,78,ad,00,1c,09,04,8d, 
00,1c,29,2e,85,42,20,68, 
06,c6,43,d0,f9,a2,20,20, 
75,06,20,92,06,a9,ee,8d, 
®c,1c,a9,01,85,22,38,eS, 
01,03,38,f0,0a,ae,®®,1c, 
e8,20,75,06,88,d0,F6,20, 
92,06,20,bd,06,85,22,c9, 
23,10,06,20,57,86,4c,39, 
06,ad,280,1c,29,Ffb,8d,2®, 
1c,39,ec,8d,8c,1c,5B,60, 
a0,02,ae,20,1c,e8,20,75, 
06,88,d0,f6,e6,22,4c,32, 
06,a0,02,ae,00,1c,ca,20, 
75,806,88,d0,F6,60,8a,29, 
03,85,bb,ad,20,1c,29,Ffc, 
05,bb,8d,08,1c,29,04,85, 
bb,a2,00,ca,d®,fd,c6,bb, 
d®o,F9,60,a5,22,20,4b,fF2, 
8a3,03,03,03,03,03,85,44, 
ad,88,1c,29,9F,05,44,Bd, 
00,1c,60,ad,0c,1c,29,1fF, 
09,c8,8d,0c,1c,a9,Fff,8d, 
03,1c,8d4,01,1c,60,a5,22, 
20,b0,07,85,43,20,aa,06, 
a9,ff,8d,01,1c,a9,00,85, 
bc,aa,38,a5,39,939,090,93, 
a5,bc,99,02,03,35,22,99, 
03,03,a5,13,99,04,03,85, 
12,99,05,03,39,0Ff,39,06, 
03,99,07,03,39,00,59,02, 
03,59,03,903,59,04,03,59, 
05,03,39,01,03,18,398,69, 
08,88,e6,bc,a5,bc,c5,43, 
90,c1,98,48,e8,Ba,3d,00, 
04,e8,d0,fa,a9,4b,8d,08, 
04,29,03,85,31,20,30, Fe, 
68,28,88,20,e5,fd,29,F5, 
£fd,a9,04,85,31,208,e9,F5, 
85,33,20,8f,£f7,a9,00,85, 
32,a9,ff,8d,01,1c,a2,05, 
Sa,fe,b8,ca,dd,fa,a2,®a, 
a4,32,50,fe,b8,b9,00,03, 
8d,21,1c,c8,ca,d@,F3,84, 
32,a2,08,50,Ffe,b8,a9,55, 
8d,21,1c,ca,d®,Ff5,a9,Fff, 
a2,05,50,fe,b8,8d,®1,1c, 
ca,d@,f7,a2,bb,50,Ffe,bB, 
bd,008,01,84,01,1c,e8,d®, 
£4,30,00,50,fe,b8,b1,3®, 
8d,81,1c,c8,d0,f5,a9,55, 
a2,08,50,Ffe,b8,8d,®1,1c, 
ca,d®d,f7,c6,bc,d®,9a,50®, 
fe,b8,50,fe,b8,20,00,Fe, 
60,20,4b,F2,c9,a3,d®,02, 
a9,11,60,a9,24,85,Fb,a9, 
£fb,85,bb,a9,00,85,bc,a9, 
01,85,b7,a9,08,85,ba,a9, 
60,85,b9,28,d5,f3,a5S,ba, 
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17c1 20,b4,FF,a5,b9,20,36,EF, fs 
17c9 a9,20,85,90,a0,03,84,fb, c3 
17d1 20,85,ff,85,fc,a4,30,d0, ®d 
1749 2f,20,85,ff,a4,990,d9,28, 71 
17e1 a4,fb,88,d0,e9,a6,fc,20, 88 
1789 cd,bd,a9,20,20,d2,ff,20, c6 
17f1l aS,ff,a6,90,d0,12,aa,f®, 33 

= ı7£9 06,20,d2,ff,4c,f8,17,a9, 84 
1801 2d,20,d2,Ff,a0,02,d0,c6, 67 
1803 20,42,f6,60,49,00,20,bd, 7 
1811 Ff,aS,0f,a8,a2,08,20,ba, bd 
1819 FF,20,c0,Ff,a2,0Ff,20,c9, 89 

= 1821 FF,a9,4d,20,d2,ff,a9,2d, de 
| 1829 20,d2,fFf,a9,57,20,d2,ff, ae 
= 1831 a9,00,20,d2,fFf,a9,05,20, 32 
u 1839 d2,ff,a9,1c,20,d2,Ff,a®d, Od 
1841 80,b9,56,18,20,d2,ff,c8, Ob 

2 1849 c8,1c,98,f5,28,cc,ff,a9, e9 
= 1851 0f,20,c3,ff,60,20,00,c1, 33 
| 1859 20,e5,c1,88,88,80,73,02, e3 
1861 a2,00,29,8d4,20,68,c2,e8, 4f 
1869 Be,78,02,20,12,c3,4c,56, 3e 

] 1871 ee,a9,00,20,bd,ff,a9,0Ff, 7d 
1879 a8,a2,08,20,ba,ff,208,c®, Ba 
1881 ff,a9,00,85,fb,a9,06,85, a4 

ı 1889 Fc,a9,ee,85,fd,a9,18,85, a2 
a 1891 Fe,a2,0F,20,c9,ff,a9,4d, 71 


ie viele bereits wis- 
sen, wird beim For- 
matieren jede Diskette 
in Spuren (Tracks) und 
Sektoren (Sectors) aufgeteilt. Ebenso 
wird ein Inhaltsverzeichnis angelegt, 
welches auf die mittlere Spur zu liegen 
kommt, da von dort aus der mittlere 
Weg zu allen anderen Spuren am kür- 
zesten ist. Bei der 1541 wurde die kom- 
plette Spur 18 ausschließlich für das 
Directory reserviert. Ihr Sektor 0 ent- 
hält wichtige Informationen über den 
Zustand der Diskette und unter ande- 
rem auch ihren Namen. Ab Sektor 1 
folgt die Liste der gespeicherten Pro- 
gramme. Jeder dieser Sektoren wird 
mit acht File-Einträgen mit dem glei- 
chen Format belegt. Sind mehr als 
acht Programme gespeichert, so ist ein 
neuer Sektor an die Liste angehängt 
worden. In jedem Block zeigen die 
ersten beiden Bytes Track- und Sek- 
tornummer des Folgeblocks an. Der 
letzte Sektor des Directories wird ge- 
nau wie bei normalen Programmen 
durch eine Null als Nummer des Fol- 
getracks gekennzeichnet. Die zweite 


WARNEN ER WERDEN, 


| 1899 20,d2,FF,a9,2d,20,d2,fFF, 84 
18al a9,57,20,d2,FFf,a5,fb,20, d5 
1Ba3 d2,FF,aS,fc,20,de,ff,as, 21 

| 18b1 20,20,d2,fF,a0,00,bl,fd, 26 


J 1863 20,d2,ff,c8,c0,20,90,F6, bf 


| 18c1 20,cc,ff,18,35,Ffd,69,20, 2c 
= 1809 85,fd,a5,fe,69,00,85,fe, If 
18d1 18,35,fb,69,29,85,fb,a5, f6 
| 18d9 Fc,69,00,85,fc,c9,07,d®, 78 
18el b0,a5,fb,c9,60,d0,aa,a9, ce 
1883 8Ff,28,c3,FFf,69,7B,ad,00, 48 
18f1 1c,09,04,8d,00,1c,a9,2e, e3 
18£9 85 ,4a,20,4b,06,c6,4a,d®, cb 
1901 FS,a2,00,20,58,96,20,75, 34 
1909 86,39,ee,8d,0c,1c,39,01, 56 
1911 85,22,38,e9,901,0a,a8,Ff®, 61 
1919 Ba,ae,00,1c,e8,20,58,06, 5a 
1921 88,d0,f6,20,75,906,20,a0, 7c 
1923 806,ad,808,1c,29,fb,8d,08, fa 
1931 1c,a9,ec,8d,0c,1c,58,60, ba 
1939 a®,02,ae,80,1c,ca,20,58, 66 
1541 06,88,d0,f6,60,8a,29,03, 55 
1949 85,bb,ad,08,1c,29,fc,85, 68 
1951 bb,8d,20,1c,a9,04,85,bb, 80 
1959 a2,098,ca,d®,fd,c6,bb,d®, bd 
1961 F9,60,35,22,20,4b,f2,8a, 58 
) 1969 da,8a,08,03,08,85,44,ad, 1d 


Das korrekte Listing von „Spurformat“ aus dem RUN-Sonderheft 1/87 — als Hexdump-Lader 


Werden Programme auf einer 
Diskette gelöscht und andere 
wieder gespeichert, so entsteht 
ein scheinbares Chaos in der 
Reihenfolge der Directory- 
Einträge. Das ist zu umgehen, 
wenn man weiß, wie die Floppy 
arbeitet — oder den „Directory- 
Sorter“ benutzt. 


Speicherzelle enthält in diesem Falle 
die Anzahl der noch zum Eintrag ge- 
hörigen Bytes. Wird ein Programm ge- 
laden, durchsucht das Laufwerk dieses 
Verzeichnis. Findet es den angegebe- 
nen Filenamen, fährt es den Kopf auf 
den Anfangssektor und lädt die Daten 
in den Computer. 


Gelöscht und dennoch 
vorhanden 


Was geschieht wenn ein Eintrag ge- 
löscht werden soll? Hier tritt ein neuer 
Filetyp auf den Plan. Neben den be- 


1971 88,1c,29,9f,05,44,8d,00, bd 
1979 1c,698,ad,2c,1c,29,1f,09, 66 
1381 c0,8d,0c,1c,39,ff,8d,03, 57 
1989 1c,8d,81,1c,690,20,8d,06, 3b 
1931 a9,ff,8d,01,1c,29,00,20, ®a 
1933 00,99,00,024,88,d0,fa,a9, 6c 

ı 19a1 03,85,31,20,30,fe,a9,15, 56 
ı 1939 85,43,85,bc,0a,0a,0a,a8, 6d 
19b1 88,20,e5,fd,20,f5,Ffd,a9, cf 
19b9 04,85,31,208,e9,F5,85,3a, cf 
= 19c1 20,8F,F7,a9,00,85,32,a9, e4 

‚ 1909 ff ,8d,01,1c,a2,05,50,fe, 45 

19d1 b8,ca,dO,fa,a2,da,a4,32, cd 

19d9 58,fe,b8,b9,00,03,8d4,01, db 

‘ 19el 1c,c8,ca,d0,f3,84,32,a2, “4e 

19e9 08,59, fe,b8,a9,55,8d,01, de 

1Sf1 1c,ca,d®,F5,a9,ff,a2,05, 75 

19f9 SO, fe,b8,8d,01,1c,ca,d®, 5c 

1a01 f7,a2,bb,50,fe,b8,bd,80, c2 
1a03 01,84,81,1c,e8B,d®,f4,a0, c5 
1all 00,50,fe,b8,b1,30,8d,81, ®2 
lalS 1c,c8,d0,f5,a9,55,a2,98, 1d 
1a21 S5®,fe,b8,8d,01,1c,ca,d®, Sc 
1a29 f7,c6,bc,d®,9a,50,fe,b8, ac 
1la31 50,fe,b8,20,00,fe,60,00, 4d 


ORDNUNG INS DIREGTORY 


kannten Klassifikationen PRG, REL, 
SEQ und USR gibt es noch das Kürzel 
DEL, was soviel wie deleted (gelöscht) 
bedeutet. Im Directory tritt diese Ab- 
kürzung normalerweise nicht auf, da 
gelöschte Files nicht angezeigt werden. 
Trotzdem sind sie zunächst noch vor- 
handen, denn der Scratch-Befehl än- 
dert lediglich den Filetyp auf DEL und 
gibt die belegten Blöcke in der BAM 
wieder frei. Erst wenn ein neues Pro- 
gramm auf die Diskette geschrieben 
werden soll, geht die 1541 das Direc- 
tory durch und belegt nach und nach 
eventuell auftretende Lücken. Für ei- 
nen ungehinderten Dauerbetrieb ist 
das sicherlich sinnvoll, doch für den 
Anwender wird es spätestens dann un- 
übersichtlich, wenn zusammengehöri- 
ge Files zwischen andere Programme 
verteilt ins Directory aufgenommen 
werden. Mit dem Programm „Direc- 
tory-Sorter“ kann man die Disketten 
auf einfache Weise aufräumen. Es 
wird als Basicprogramm geladen und 
mit RUN gestartet. Zuerst erscheint 
eine kurze Anleitung und nachdem die 
betreffende Diskette eingelegt und $ 
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eine Taste gedrückt ist, wird das In- 
haltsverzeichnis angezeigt. Jeder Ein- 
trag erhält eine Nummer. Gelöschte 
Files sind durch eine dunklere Schrift- 
farbe gekennzeichnet. Nun wird die 
neue Reihenfolge abgefragt. Im ein- 
fachsten Fall sollen nur die gelöschten 
Files eliminiert werden. Dazu wird „S“ 
eingegeben. Der Computer sortiert 
daraufhin die gelöschten Files ans 
Ende der Liste. Sie gehen also nicht 
verloren, verursachen aber auch kein 
Chaos mehr beim Speichern neuer 
Programme. 

Die Files lassen sich auch beliebig um- 
ordnen. Dazu genügt die Angabe der 
gewünschten Reihenfolge mittels der 


664 LISTING 


zeichnis beispielsweise elf Files ange- 
zeigt, dann kann eine Eingabe lauten: 
1234561097811. 


Geschwindigkeit 
durch Compilieren 


Sollten nicht alle Eingabezeilen aufge- 
führt sein, dann werden die genannten 
Files nach vorne gezogen und alle üb- 
rigen in ihrer Reihenfolge angehängt. 
Bei mehrfach aufgeführten Zahlen ist 
nur die erste Nennung maßgebend. 
Setzt man ein „—“ zwischen zwei Zah- 
len, dann bleibt die Reihenfolge von 
der ersten bis zur zweiten genannten 
Filenummer unverändert. Die Einga- 


möglichst verständlich geschrieben, 
damit auch Anfänger Einblick in die 
schwierige Programmierung des Dis- 
kettenlaufwerks bekommen. Durch 
diesen Programmierstil ergeben sich 
notwendigerweise Geschwindigkeits- 
einbußen. Wem die Ausführung zu 
langsam erscheint, der kann das Pro- 
gramm mit den üblichen Compilern 
bearbeiten. Zu Bemerken ist noch, 
daß dieses Programm nur ordnungsge- 
mäß vom DOS erstellte Directories 
sortiert. Vorsicht ist also bei Profi- 
Software geboten. Hier sollte man 
sinnvollerweise erst eine Sicherheits- 
kopie der Diskette anlegen, bevor man 
mit dem Sortieren beginnt. Dann kann 


Filenummern, getrennt durch ein bezeile wird mit RETURN abgeschlos- Nichts mehr schiefgehen. 
Leerzeichen. Wurden im Inhaltsver-- sen. Das Programm wurde bewußt (U. Gerlach) IM 
. C64 137 print ‚"”Cwht, 2spaces]lUwe Gerlach” 1472 
System: = /Floppy 148 print ‚”"[2spaces)Bruehlstr. 23”,,,"” 3541 
Art: Utility [2spaces]64408 Bebra 1" 
' Sprache: Basic/ Assembler 158 print :print ”"[cbm SJEs dient zum 4403 
: Umsortieren der Directory-” 
Programmname: Directory-Sorter 168 print "Eintraege auf einer Diskette, 4286 
wobei auch”; 
178 print ”C[cbm 4Jgeloeschte Files[chm 5] 3966 
bearbeitet werden.” 
198 print "”Zunaechst erscheint der 3723 
jetzige Inhalt.” 
208 print ”Man kann dann die neue 4487 
Reihenfolge ange-”; 
205 print "ben. Dabei gibt es einige 3983 
18 rem .ununkhahaen euere Abkuerzungen:” : 
e ei > 2 210 print ”So uebernimmt 'Ccbm 7Jm-n 3829 
Re " Hirentery - Härter £ [cbm 5)’ alle Eintraege von 
14 rem = ” 228 print ”m bis n. Alle nicht genannten 34094 
15 rem “ “ Files” 
16 rem “ uwe gerlach “ f » RE 
17 rem ” bruehlstr 23 * er en nn ar 
18 rem . * r 
19 rem “ 6440 bebra 1 “ 240 print ”sen. Soll z.B, nur das 9. File 4241 
28 rem * * an die 7.”; 
21 rem “ ” : P* : f 
22 rem ” februar 1985 nd er Be ec hg a 
E3 rem ” ” 
24 rem - - 268 print "”'[cbm 73SCcbm S]’ schiebt alle 42B1 
25 rem a Ccbm “4Jgeloeschten Files[chbm 5] ans” 
40 : 278 print "Ende der Liste, ’Ccbm 710 3302 
41: [cbm 5)’ bricht ab.” 
S5® poke 53280,8:poke 53281,0:rem farbe 1552 ? : N 
51 poke 55,255:poke S6,105:rem obere g 1574 888 print :print "Luht,7spacesJist die e371 
renze des basic-speichers: S6Fff Diskette drin ? 
Se elr 156 839 get a$:if a$=-"" then 890 1572 
55 b=-28672:rem 57000 ablagespeicher 1058 
60 dim n$(C144):rem max. eintraege 871 
62 dim 1(144):rem fFiletyp 887 908 print "[Cclr)”;chr$ (142):print :print 5513 
65 dim s(18):rem moegl. dir.-bloecke 907 "L[wht ,3spaces]Jdie diskette enthaelt 
78 dim t(18) 767 folgendes: [cbm 4)J”:print 
75 t=18:rem track 737 999 ; 
BO t(O)-t 618 1008 rem *** block lesen *** 
85 s-l:rem sector 583 1901 : 
98 s(2O)=-s 577 18018 open 1,8,15:rem kommandos 964 
118 print ”"C[Cclr)”;chr$ (14); ”"Cuht, se22 1028 open 2,8,2,”#":rem puffer 1255 
2spaces]Willkommen beim Directory - 1025 m=1:rem blockzahler 583 
Sorter” 19027 n"®:rem filezaehler 582 
138 print :print ”"[cbm S]JDieses Programm 4o41 1028 f=-®:rem zaehler belegte files 572 
wurde Fuer den C64 und” 1829 a=-b:rem anfang rambereich 384 
135 print "sein Laufwerk UVC 1541 4338 1038 print#1,"ul:”2;8;t;s:rem lesen 1715 
geschrieben von:”:print 1848 get #2,a$,b$ 768 


1058 
1055 
1068 
1065 
1075 
10908 
1100 : 
1110 : 
1120 : 
1125 : 
1130 : 
1135 ; 
1140 :; 
1150 : 
1200 : 
1210 : 
1220 : 
120903 
1230 : 
1240 : 
1250 : 
1855 : 
1260 : 
1278 : 
1300 : 
1350 : 
1360 : 
1365 : 
1370 : 
1380 : 
1390 : 
1490 
1458 
1469 : 
1479 
1471 
1508 
1505 
1510 
1512 
1515 
1520 
1525 
1527 
1538 
1531 
1532 
1535 
1537 
1538 
1549 
1545 
1558 
15608 
1561 
1562 
1565 
1567 
1568 
1569 


5 


t=asc (a$+chr$ (B)):rem track 
t(m)=-t 

s-asc (b$+chr$ 
slm)-s 
m-m+l:rem 


(B)):rem sector 


naechster block 


for jJ*-1 to B:rem eintraege/block 
n=-n+l:rem Filezaehler 

for i=® to 2:rem bytes/eintr. 
get #2,a$ 

if a$=-"" then a$=chr$ (0) 

poke a,asc (a$):rem speichern 
if i=® then l(n)=asc (a$):rem file 
typ 

a=-a+tl:rem pokeadresse 

next i 

for i=3 to 18:rem filename 

get #2,a$ 

if a$=-"" then a$=chr$ (8) 
n$(n)=n$(n)+a$ 


poke a,asc (a$) 

a=a+tl:rem pokeadresse 

next i 

if n?>9 then print "”[Lleft)”; 

if n$(n)>” ” then print "[cbm 5]J”;n; 
if l(n)=® then print ”[cbm 4)”; 

if n$(n)>” ” then F=f+1:print n$(n), 
rem name drucken 
for i-19 to 3l1:rem 
get #2,3$ 

if a$=-"" then a$=chr$ 
poke a,asc (a$) 
a=ra+tl:rem pokeadresse 
next i 

next J 

if t<>® or s<>255 then 1038:rem 
letzter directory-block 


rest 


(0) 


rem ®*#® eingabe *** 

print :print :;print ” [LwhtljJwelche 
neue reihenfolge?[2spaces) 
eingabeform:” 

print "nummer <leer> nummer <leer> 
... <return?>[cbm 7,up)” 

input a$ 

print :print :print ” [Cwhtlich 
arbeite”; 

dim z(n+l1):rem neue filenummern 
s-d:rem zeiger in a$ 


ok=®:rem marke eingabelaenge 
i=-l:rem indexzaehler 
y"@:rem marke m-n 


z3=- »n 

s=-s+l:rem zeiger in a$ 

if s>len (a$) then ok=1:goto 1568:rem 
a5 durchlaufen ! 


bS=mid$ (a$,s,l):rem zeichen 

if b$="-” then y=1:goto 1560:rem ma 
rke 

2$*-z$+b$:rem evtl. mehrstellig 

if b$>”" ” then if z2$<”0” or z$>"9” 
then 5508: rem keine zahl! 

if bS<c>” ” and y<>1 then 1532:rem n 
aechste ziffer 


if val (z$)=-® and s>len (a$) then 

1608: rem keine weiteren eingaben 
z(i)=-val (z$):rem isolierte zahl 
if i=-1 and z(i)=® then z(li)-1 

if zCi)>f then print :print "Cup, 


cbm 3]fehleingabe: zahl zu gross!”: 
goto 6018 


if z(i)=-® then print, :print ”[Lup, 

cbm 3Jfehleingabe: filenummer ® ?”: 
goto 6018 

if y=1 then yil=z(i):y=-2:goto 1531:rem 
endzahl n lesen 


if y=2 then 500®:rem auffuellen 


Bin 


1362 
72 
1377 
438 
406 
839 
889 
567 
653 
1188 
575 
1354 


758 
1008 
608 
653 
1188 
1364 
>3 
758 
1988 
12508 
1814 
1335 
2410 


664 
653 
1188 
459 
750 
1008 
278 
2255 


4803 


4214 


407 
2038 


833 
5B5 
723 
573 
ss1 
425 
436 
2281 


1238 
2163 


945 
28828 


2268 


2387 


sı2 
2194 
5223 


4645 


2342 


1152 


1578 
1571 
1572 
1574 
1576 
1578 
1588 
1593 
1600 
1601 
1618 
1615 
1629 
1638 
1649 
1658 


1660 


1999 : 


2009 
2001 
2108 


e11l2 
e1lS 
2120 
2130 
2150 
2220 
2230 
2240 


2250 
2255 
2257 
2288 
2282 
2285 


2287 
2283 


22398 
2308 
4008 
4020 
4030 
4933 
5020 


5001 
5005 
5010 
5020 
5025 
5038 
5035 
Sso40 
ElGEI) 
5060 
5078 
5030 
5160 
5508 
5501 


5505 


5518 
5520 
5530 
5558 
5569 


5578 
5999 


6900 


6010 
6020 


da=®:rem marke doppeleingabe 
if i=-1 then 1578 

for j=1l to i-l:rem schon mal da”? 
:if z(i)=z(Cj) then da=1 
next J 

if da-=-® then i-i+l:rem 
if ok=-®B then 1538:rem 


index+1 
naechste 
rem ®*** vervollstaendigung *** 
for j*-1 to n:rem alle files 
:ok=d:rem marke fuer erledigt 
:Ffor kei ton 

:if zck)=jJ then ok=1 

:next k 

:if ok=® then zli)=jJ:i=-i+l:rem 
anhaengen, wenn nicht aufgefuehrt 
next J 
rem “.“ ausfuehrung *** 
print "[3spaces)-[3spaces]bitte nicht 
stoeren!” 
m=-d:rem blockzaehler 

l1-®:rem filezaehler 
print#1,”b-p 2 2”:rem zeiger 2 
for i=-1 to B:rem eintr./block 
sasg-"" 

:1=-1l+1:rem filezaehler 

:Por: 3°1tzC1I-29*32. 10 2013981 

:if 1>f then a$*-a$+chr$ (B):goto 
2255:rem nicht mehr belegt 
:#$=-a$+chr$ ( peek (b+j)):rem ab b 
next J 

:print#2,a$;:rem in den puffer 
next i 
print#1,”b-p 2 B8”:rem zeiger ® 
as=chr$ Ct(m+1))+chr$ (s(tm+t1)):rem 
track/sector des naechsten dir-blocks 
print#2,a$;:rem in den puffer 
print#1, "u2:”"2;8;C(t(m));(CsCm)):rem 
zurueckschreiben auf disk 
m-m+l:rem naechster block 

if l<n then 2128:rem alle blocks 
print "Lup] 0.k.[36spaces)” 
print#1,”"i®"”":rem disk initial. 
goto 6218:rem ende 


rem *“+# einfuellen *** 


if yl=-®8 then yi=-i1:rem - am anfang 
for k=yl to val (z$):rem -zahl 
:da=®: rem marke doppeleingabe 
:zC(i)=k:rem wert zuweisen 

sfor J=17to.4-T 

:if i=1l then 5058:rem l.eintr. 
:if z(i)=z(j) then da=1 

next J 

:if da=® then i-i+l 

next k 


goto 1530:rem naechste zahl 


rem *** nicht gescratchte Files *** 


if b$="q” then print :print "[up, 
13spaces}]”:goto 6018:rem ende 


if b$<>"s” then 6000: rem fehler 
i=-l:rem zeiger 

for j=1 to f:rem alle files 

:if 1C0J)<>8 then z(i)=jJ:i=-i+l 
next J 

goto 16008 


print :print ”[Cup,cbm 3]fehleingabe: 
zahl erwartet!” 


close 1:close 2 
print :print :print "[cbm SIrunl3up]” 


692 
1072 
1175 
1438 

278 
1410 
1347 


1033 
484 
563 

1215 
108 

2027 


278 


2348 


573 
578 
1174 
837 
583 
868 
2425 
2352 


1994 
194 
731 
876 

1166 

8773 


749 
2648 


4Dd6 
1068 
B245 
762 
64B 


1655 
1518 
Ace 
943 
762 
1v12 
1438 
104 
1185 
280 
674 


2802 


1566 
573 
19032 
2227 
278 
583 


3144 


530 
1424 
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GBA LISTING: 


ELEGANTES BOD 


it dem Programm 
„Booting C64“* ist es 
möglich, ein Pro- 
gramm für den C64 im 
128-Modus zu booten. Dadurch wird 
der Vorteil des Bootens nicht nur für 
den C128 genutzt, sondern auch für 
den integrierten C64. Das gewünschte 
Programm kann entweder mit 
5.048,17, odermit „.. . ‚8* geladen 
werden. „Booting 64“ wird mit RUN 
gestartet. Nachdem der Maschinen- 
code in den Speicher gepoket ist, wird 
man aufgefordert, den Namen des be- 
treffenden Programms einzugeben. 
Der Filename darf nicht länger als 
acht Zeichen sein. Auf die Frage, ob 
das Programm mit „... ,8,1“ zu la- 
den ist, ist mit ja oder nein zu antwor- 
ten. Bei Autostart-Programmen sollte 
stets mit ja geantwortet werden. Als 
nächstes folgt die Farbwahl. Hier sind 


Wer kennt als C128-Besitzer 
nicht das lästige Niederdrücken 
der Gommodore-Taste oder den 
berühmten Spruch „GO 64“, um 
in den 664 Modus zu gelangen? 

Jetzt gibt es eine elegantere 

Lösung: „Booting 664“. Das 

Programm bootet ein File im 
6128-Modus und wechselt dann 
zum 664, um dort das Programm 

auszuführen. 


Übergang in den C64-Modus darge- 
stellt werden sollen. Nun wird ein 
Bootsektor auf die Diskette geschrie- 
ben. Es gibt drei Möglichkeiten, das 
Bootfile zu testen: 

1) Computer ausschalten und wieder 


2) Resetknopf drücken 

3) BOOT eintippen. 

Hinter dem Programm steht ein einfa- 
cher Trick: Mit Hilfe des Bootvektors 
wird ein Maschinenprogramm in den 
Speicher gelesen. In diesem Code ste- 
hen Informationen, die bei $8000 ein 
Modul simulieren. Anschließend wird 
die MMU veranlaßt, in den C64-Mo- 
dus zu schalten. Nun stößt das C64- 
Betriebssystem auf das anscheinend 
vorhandene Modul und übergibt ihm 
die Kontrolle. Von hier ab ist es ein 
leichtes, mittels Tastaturpuffer Befeh- 
le zum Laden und Starten von Pro- 
grammen zu geben. Soll ein Basic-Pro- 
gramm gebootet werden, so sollte die 
RUN/STOP-RESTORE-Taste wieder 
freigegeben werden (das Programm 
sperrt sie automatisch). Dies geschieht 
mit einem Poke am Anfang des Pro- 
gramms: POKE 808,237. 


die Farben gemeint, die nach dem anschalten (A. Paulsen) oO 
System: C128 (C64)/Floppy 178 print "wechselt, ein Programm 3653 
x geladen und dort 
Art: Utility 188 print "gestartet !" 994 
Sprache: Basic/ Assembler 190 gosub 738:rem datas einlesen 747 
Programmname: Booting C64 er print :print ” Installation: ”:print 2223 
; E28 open 15,8,15:open 2,8,2,”#"” 2144 
230 : 
240 print#15,”"ul:2 9 18 8”:print#15,"b- 2889 
® rem HH p:2 5” 
“ 850 get #2,ba$ 613 
il rem ** “ 868 print#15,"ul:2 8 1 9” 1227 
. r 278 a=-ds:if a<>® then print "[chbm 8, 4087 
El 2 rem *" booting 64 ” he down]Disketten-Fehler: "ds$:close ?: 
Js ” ‘ end 
} 3 rem ** ” E 288 if C asc (ba$) and 1)<>® then goto 1953 
| - 370 
| 4 rem ** idee & realisation * 290 : 
rn “ 308 For x=® to 2:get #2,a$:g9$=g$+a$:next 2723 
ja 5 rem ** . 310 if gS$=-"chm” then print "Der BOOT- 5382 
E “ £ Sector existiert schon !”:goto 349 
x 6 rem ** arnd paulsen 4478 meppen ” ni 328 print "Es befindet sich ein Programm 3459 
s ” auf dem 
RE 7 rem ** ” 338 print "BOOT-Sector !"” 1608 
” 348 bl=1:print ”"Cdown,cbm BlFortfahren 3697 
! 8 rem EZ EZ ZZ ZT ze ZZ zz zz zZ ze ee ee 2 2er (J/n) ?":print :print :print 
ba 358 get key t$:if t$<>”jJ” then char ‚10, 14698 
9. 16,”Ccbm 8JProgramm beendet !"”:end 
' 180 bo$="[2left,2Zright]”:rem boot-nachri 1304 360 : 
h cht (4 zeichen !) 378 print#15, "ul:2 8 ı 9” 1227 
= 118 color 8,1:color 4,1:color 5,16 1956 e 388 print#15S,”"b-p:2 9” 1229 
IR 128 print chr$ (147) chr$ (14) chr$ (11) 2008 u 398 print#2,”cbm”;chr$ (8);chr$ (®);chr$ 3188 
" 130 print "[14spacesJBooting 54” 2078 & (8);chr$ (0); 
= 148 print :print ”CyellDas Programm 4751 408 print#2,bo$;chr$ (®);chr$ (0), 2120 
a ermoeglicht ein automati-” 418 char ‚®,11,chr$ (27)+”@” 1688 
= 158 print "sches BO0Ten auf dem C128.” 32808 428 print ”[cbm 8JBitte geben Sie den 49003 
©) ı16® print "Danach wird zuerst in den 4312 Name des Programms" 
64 'er Modusge-"” 438 print "ein, das nachgeladen werden 3488 
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soll” j 688 if bl=-® then print#15,”b-a:Q 1 0” 2038 
448 print "(max. 8 Zeichen)” 1678 698 close 2:close 15:print :print :print 1756 
458 input ”[down,yellName[l2spaces] 49004 ds$ 
”......[1Qleft)]"”;na$ ! 700 : 
468 For n=1 to B:poke dec C"®baf”)+n,asc 3634 718 end 128 
C mid$ (na$,n,1)):next ’ 78208 : 
470 : | 738 For i=-dec ("®b2d”) to dec (”Obdb”): 4263 
488 print :print ”[cbm 8]Soll das 3645 read da:poke i,da:su=-su+da:next i 
Programm mit ',8,1’ geladen” 748 if su<>22318 then print "Fehler in 3525 
498 print "werden (3j/n) ?” 1389 Datas!":end :else return 
508 get key t$:iFf t$="j"” then poke dec 2527 Ä 750 : 
(”"®bef”),1:goto 558 768 data 162,0,189,50,11,157,0,128,232, 6386 
510 : 228,176,208,245,173,90,255,72 
528 rem nicht mit ‚8,1 laden 778 data 169,0,141,0,255,173,6,213,9,6, 6583 
538 poke dec (”®bbc”),32:poke dec 3083 141,6,213,104,141,0,255 
("®bbd”),32 788 data 76,77,255,9,128,9,128,195,194, 5522 
Sy8 : 205,56,48,128,142,22,208,32 
558 char ‚®,11,chr$ (27)+"@” 16008 790 data 163,253,32,80,253,32,21,253,32, 85213 
568 print "Bitte geben Sie die Farben 3458 91,255,88,32,83,228,32,191 
fuer den” 808 data 227,162,251,154,169,9,141,6, 6588 
578 print ”"64’er Modus ein !”:print 2401 128,169,0,141,32,228,169,0,141 
588 input "[yellRahmen[8spaces]13[4left] 2338 818 data 33,208,72,138,72,152,72,169, 6446 
".fa 127,141,13,221,32,188,246, 32,225 
598 poke dec ("0bS5b"),Ffa 1038 B2® data 255,32,21,253,32,163,253,162,0, 6749 
608 input "Hintergrund[3spaces]il[l4left)] 2718 189,138,11,157,17,208, 232,224 
ui.‘ 830 data 10,208,245,76,149,11,27,0,0,0, 49567 
618 poke dec ("0b60"),fa 1833 8,2008,0,23,121,240,0 
628 input "Schrift[7spaces]i11[l4left]";fa 2326 840 data 162,0,169,0,141,134,2,189,170, 5942 
630 poke dec ("0b98”),Fa 1834 11,224,28,240,35,32,210,255 
640 For i=-dec ("0b0d”) to dec C"Obdb”): 23390 850 data 232,76,156,11,147,17,17,76,207, 6279 
print#2,chr$ ( peek (i));:next i E 34,80,82,71,46,78,65,77 
658 char ‚8,9,chr$ (27)+"@”:print 1911 } 868 data 69,42, 34,44,56,44,49,13,17,17, 5853 
668 print "[chbm 8, 4spacesJBO0T-Sector 3497 17,17,82,213,19,169,13 
wird installiert I!” 878 data 141,119,2,141,120,2,169,2,133, 6025 


678 print#15,"u2:2 9 1 9” 1231 198,169,234,141,48,3,108,2,169,0,0 


Booten von C64-Programmen im 128er Modus. 


rfunden wurde dieses 
Spiel von dem Mathemati- 
ker John Horton Conway. 
Es findet auf einem beliebig 
großen Spielfeld statt, das in einzelne 
quadratische Felder unterteilt ist. Je- 
des Feld kann entweder gefüllt oder 
leer sein. Begonnen wird, indem man 
eine Anzahl von Steinen in das Spiel- 
feld setzt. Diese Figur wird dann nach 
drei Regeln verändert: 
a) Ein Stein wird herausgenommen — 
er „stirbt“ — wenn sich in seinen acht 
Nachbarfeldern entweder mehr als 
drei Steine befinden (Erstickung), 
oder wenn sich in seiner unmittelbaren 
Umgebung weniger als zwei Steine be- 
finden (Einsamkeit). 
b) hat ein Stein genau zwei oder drei 
Nachbarn, überlebt er. 
c) Befinden sich in den acht Nachbar- 
feldern eines leeren Feldes genau drei 
Steine, so wird in dieses leere Feld ein 
neuer Stein „hineingeboren“. Das Be- 
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Lebensformen 
auf mathematischer Ebene — 
gibt es so etwas? 
Der „Zellularautomat“ erweckt 
fast den Eindruck. 


sondere ist, daß diese Regeln auf alle 
Felder gleichzeitig angewendet wer- 
den, und nicht etwa nacheinander. Es 
entstehen also verschiedene Generatio- 
nen. Interessant ist hier nicht so sehr 
der Endstand des Spieles, sondern die 
Dynamik mit der sich die einzelnen Fi- 
guren verändern. So läßt sich das 
Schicksal einer Figur über mehrere 
Generationen hinweg beobachten, 
ohne daß man trotz der relativ einfa- 
chen Regeln zuverlässige Vorhersagen 
treffen kann. Es gibt Figuren, die zu 
Beginn riesengroß sind, schließlich 
aber doch völlig aussterben, das heißt, 
daß kein einziger Stein der Figur üb- 
rigbleibt. Andere Figuren wandeln 
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sich zu stabilen Zellen, die sich nach 
den Regeln nicht mehr verändern kön- 
nen — ein Quadrat aus vier Steinen, 
„Block“ genannt, ist ein Beispiel da- 
für. Andere Figuren wiederum oszilie- 
ren, sie tauchen nach einer bestimmten 
Anzahl von Generationen wieder auf, 
so zum Beispiel der „Blinker“, eine ho- 
rizontale Kette von drei Steinen. Eine 
kleine Auswahl interessanter Figuren 
findet sich unter dem Menüpunkt 
Spielregeln in dem Programm „Zellu- 
larautomat“. 

Befindet man sich im Hauptmenü des 
Programms, kann man mit „S“ das 
Spiel mit einer neuen Figur starten. 
Will man die Steine selbst eingeben, so 
müssen für jeden Stein die Koordina- 
ten des Feldes angegeben werden, in 
das er gesetzt werden soll — und zwar 
in der Form: (Zeile), (Spalte). Mit der 
Eingabe von (0,0) wird dieser Menü- 
punkt beendet. Wenn der Computer 
die Startfigur erzeugt, so muß angege- $ 
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ben werden, in welchem Teil des Spiel- 
feldes dies geschehen soll. Auf diese 
Weise kann man Größe und Lage der 
Figur festlegen. Außerdem wird die 
Wahrscheinlichkeit abgefragt, mit der 
ein Punkt in diesem Feld gesetzt wird. 
Mit „N“ wird die nächste Generation 
berechnet und auf dem Bildschirm 
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werden mehrere Generationen hinter- 
einander berechnet, wobei nur die 
letzte auf dem Bildschirm erscheint. 
„V“ verschiebt eine Figur innerhalb 
des Spielfeldes. Dies ist dann sehr 
nützlich, wenn eine Figur zu nahe an 
den Spielfeldrand wandert. Mit „I“ er- 
fährt man, wie viele Steine sich in ei- 


ein Spielfeldausschnitt in der Größe 
des Bildschirmes. Um sich einen ande- 
ren Bezirk anzusehen, gibt man „B“ 
und die zutreffenden Koordinaten ein. 
Mit „H“ wird die Spielanleitung aus- 
gegeben, mit „D“ kann man sich den 
aktuellen Bildschirm ausdrucken las- 
sen. 


ausgegeben. Bei der Eingabe von „M“ nem Bezirk befinden. Ein Bezirk ist (S. de la Motte) O 
Sysiem: a = t halb hteck Huass 
gi rem stein ausserha rechtec - 
Art: Spiel 4l za=za+l 813 
Sprache: Basic 42 if za=l then zk=z: zg=-z:sk=s: sg=s: 3645 
. return 
Programmname: Zellularautomat ee en REN 1587 
44 if zg‘z then zg=z 1585 
45 if sk?>s then sk=s 1503 
46 if sg<s then sg=s 1597 
1 rem programm leben +*++##sannassau00a 47 return 142 
© rem initialisierung ***+#rsunuununen S® rem imaginaeres rechteck **++“runuun 
3 poke 53280,11:poke 53281,11:print 6276 Si if za<l then kz=r2:gz=4:ks=-2:gs=4: 3378 
chr$ (14)”’[clr,cbm 6] Bitte einige return 
Sekunden Geduld!" Se kz=1:if zk>1 then kz=zk-1 2543 
4 elr :restore :ze=100:sp-105:bz=ze/ 7976 53 gz*ze:if zg“‘ze then gz=zg+1 2542 
20:bs=sp/35:si=-54272:x=-9:y=0:2z-0:s= 
d:q=Bd:a=®8 
5 dim F%C101,106),r1%(c105),r2%(195), 6064 S4 ks=1:if sk>l then ks=sk-1 el 
ms(C1,12):for a=si to si+24:poke a,0: 55 gs"sp:if sg<“sp then gs=sg+1 2632 
next a S6 return 142 
6 kzr2:gz=4:ks=m2:gs=-4:zk=2:zg=4:sk=2: 8583 60 rem steine am rand zaehlen *+#+wsunes 
sg-3:0=-1:u=-28:1=1:r=-35:p=®:g-®:za-P: 61 ra=-®:if kz>1 then goto 63 1784 
ra=® 62 For s=2 to (sp-1):ra=ra+f%(1,s):next 2790 
7 n=®:m=9:v=-0:h=-®:a$="":b$="".09="”r. 6833 3 
nd$="Eingegebene Data nicht 63 if gz<ze then goto 65 1465 
definiert!” 64 For s=2 to (sp-1l):ra=ra+f%(ze,s): 2839 
8 i=-0: j=-0:k=@:hi=®:1lo=-@:for z=® to 12: 6624 next s 
read x,4:m% (ld, z)=x:m%(1,z)=y:next z: 65 if ks?1 then goto 67 359 
ga=-d:sa=-0 66 for z=-1 to ze:ra-ra+f%(lz,l):next z 2B18 
9 poke si+5,70:poke si+6,138:poke si+ 6682 67 if gs<sp then goto 69 1175 
12,70:poke si+13,138:poke si+19,70: 68 For z-=1 to ze:ra=ra+f%(z,spi:next z 2r/BE 
poke si+29,138 63 return 1 de 1 
12 print ”Cclr,down]” spc(14)”Cred,rvs, 5338 70 rem steine losschen **+#srnHunnn sn 
3spaces,off,yellLEBENLred,rvs, 71 for z=kz to gz:for s=ks to gs: f*%(z, 3581 
3spaces,off,cbm 61” spc(61)”Spiel s)=@:next s:next z 
von John Horton Conway” 72 za-d:g-® 1142 
13 print "C3downJProgramm (C) Stephan 4923 73 return 142 
de la Motte, 1987" 80 rem naechste generation **rrrennumnn 
14: ; 81 za-d:g-g+1:Ffor s=-ks to gs:r1%(s)-B: 6381 
15 x"9:y=7:gosub 259 1641 r2%(s)=®:next s:if kz>1 then kz=kz- 
17 print ”"L3downJMoechten Sie die 3751 1:goto 85 
Spielregeln?” 82 For s=ks to gs:n=£%l1,s-1)+F%l1,s+ 6257 
18 input "ja/nein ”;a$:a$-lefts (a$,1) 2482 1)+f%(l2,s-1)+f%(2,s)+fF%C2,s+1) 
19 if a$=”j"” then gosub 800 1598 83 r1%(s)=-(n=-3 or f%(1,s)=1 and n=2): 4451 
20 rem hauptmenue *+r#rannunasunnnennn if r1%(s)=1 then gosub 48 
21 gosub 178 588 84 next s 296 
82 input "s/a/n/m/v/i/b/h/d/e ”‚a$:a5- 4650 85 For z=kz+1l to gz:i=-z-2: J=z-1:k=z+1: 6105 
left$ (a$,1):a=fre (0) For s=-ks to gs:x=s-l:y=s+1 
83 q*-(a$=-"s”)-2*la$=-"a")-3*las=-"n")-4* 6040 BE n=-£E%lJ,xI+F%C)J,SsI+E%CJ ,UI+E%CZ,x)*+ 442B 
Ca$=-"m")-5*las=-"v”)-56*las=-"i") j E%XCZ,YUI+ERCK,xI+E%CK,sI+E%CK,,y) 
24 q=q-7*Lla$="b")-B*laS=-"h”)-9*las=-"d” 4948 87 F%li,s)-r2%(ls):r2%ls)=-r1%Cls):r1%(s)=- 716B 
J-10*la$="e”):if q<l then 22 -(n=3 or f%(z,s)=1 and n=2): if 
85 on q gosub 210,200,80,30,110,140, 4423 r1%(s)=1l then gosub 49 
160,800,300:if q<>18 then 21 88 next s:next z:for s=ks to gs:f%(j, 5935 
86 print ”C[CdownJWollen Sie wirklich 3174 s)"-r2%(s):fF%lgz,s)-r1%(s):next s: 
aufhoeren?” gosub S®:gosub 68 
87 input "ja/nein”;a$:a$=left$ (a$,1): 3346 89 return 142 
if a$&(>”j” then 22 98 rem mehrere generationen **+*#=uuuu0n 
28 rem programmende **rrruonuunenmenne 91 input "[down]Wie viele Generationen 6096 
32 x=-d:y=-7:gosub 259 1641 sollen berechnet werden”;m:if m<1 
34 print chr$ (142)”"[CclrJprogramm ss1o then return A 
beendet. ich hoffe, es hat”, " 92 print "Soll gestoppt werden, sobald SS586 
[2spaces]spass gemacht!” ein Stein[l2spacesJam Rand 
35 elr :end 274 auftaucht”?”; 


93 
35 


97 
38 


s3 
118 
Br 


112 
113 


114 


115 


116 
117 
118 
120 


121 


abe 
123 


124 
105 
126 
127 


128 
129 
138 
131 
132 


133 


134 
3935 


136 


137 
138 


139 
1408 
141 
2 1 
143 


144 
145 
146 
147 
148 
149 


150 
151 


152 
153 
160 


Kg 


et 


vi. 


h=2:input ” jJa/nein[L3spaces] J/n";b$: 
if bS<>”j” and bS$<>”"n” then 93 

h=-h+l1:gosub 88:print g;”. Gen.:”;za; 
"Steine,”;ra;"am Rand”:x=11:y=12: 

gosub 258 

if Ch<m) and not (ra>® and b$="5") 
and (za>®) then 35 

print ”Cdown]Die letzte Generation 
steht bereit:”:gosub 15® 

return 

rem verschieben BERRREERTEH  FE K FH E  E 

print ”[down]Das verschieben stoppt 
automatisch, [6spaces]bevor Steine 
am Rand sind!” 

print "[Cdown]lUm wieviel Felder soll 
verschoben werden”; 

input "”- senkrecht (Zahl positiv: 
nach unten, [7spaces)negativ: nach 
oben)”;v 

input ”- waagerecht (positiv: 
rechts[illspaces]negativ: nach 
links)"”;h 
if v>® then 


if v<® then 


nach 


if v>ze-gz then v=ze-gz 


if v<1-kz then v=1-kz 
if h?® then if h>sp-gs then h=sp-gs 
if h<® then if h<l-ks then h=1-ks 
if v=-® and h=® then print ”[downlEs 
wurde gar nicht verschoben! ”:gosub 
158:return 

if v>® then zk=gz: zg=kz:y=-1:goto 
123 

zk=-kz:zg=gz:y=1 

if h>Bd then sk=gs:sg=-ks:x=--1:goto 
185 

sk=-ks:sg=-gs:x-1 


zezk:s=sk ; 
F%lz+tv, sth)=f%lz,s):F%lz,s)-B:if s<> 
sg then s=s+x:goto 127 


if z<>zg then z=z+y:s=sk:goto 127 


kz=kz+tv:gz=gz+tv:ks=ks+th:gs=gs+h 
print "Cdown]Es wurde um”;abs (v); 
"Felder ";:if v>® then print "nach 
unten und”:goto 135 

if v<® then print "nach oben und”: 

goto 135 

print "senkrecht und” 

print "um”;abs (Ch); "Felder ";:if h> 
® then print ”nach rechts”; :goto 138 
if h<8 then print "nach links”; :goto 
138 

print "waagerecht”; 

print ” verschoben."”:gosub 68:gosub 
140 

return 

rem info ueber bezirke **++“u.mnue 
if bz<2 and bs<2 or za=® then return 
m-8: print "[down]”; :u=28:r=35 
n=8:0=u-19:1=-r-34:if (uckz) or (o> 
gz> or (l>gs) or (r<ks) then 147 

for i-5 to u;for j=1'to r:iEf Fxti, 
3? then n=n+1 

next j:next i:if n?m then men: z=u:s= 


r 
if nm® then print "Bezirk"”;u/20;”/”; 

7/35, 9: 9an,"Itsine” 

r-r+35:if r<=sp then 143 

umu+2B:if u<=ze then r=35:goto 143 

u=z:r=s:0=-u-19:1=-r-34: print "C[down] 

Spielfeld: ":gosub 158:return 

rem warten‘-auf taste +esnaesunsuunn 
print "[down]<<< Beliebige Taste 
druscken! >>>” 

get c$:if c$=""” then 152 

return 

rem wahl eines bezirkes **+##mnuun» 


3549 
6160 


3154 
4188 

142 
6123 


4472 


6538 


5433 


2970 
27IR 
2486 
2276 
5137 
3387 


2026 
3366 


1925 
1071 
5836 
3312 
3285 
6122 
2468 


1596 
4576 


2766 


1233 
2878 


142 
2280 
2212 
SBB6 
3172 
2831 
5538 
1849 
2723 
4490 
39353 


1584 
142 


161 
162 
163 
164 
165 
166 


167 
168 


179 
171 


172 
173 
174 
175 
176 
177 
178 
179 
1898 
182 
183 
184 
198 
191 
192 
133 
154 
195 
196 
197 
198 
199 


200 
201 


202 


203 
204 


218 
at 


ei2 
13 
214 
e15 
216 


218 


219 
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if bz{2 and bs<2 then return 

print ”Cdown]”;bz;”(Csenkr.) mal”;bs; 
”(waager.) Bezirke, "”:print 
"Benennung von li”; 


print "nks oben ( 1, 1 > nach 
rechts unten C”;bz;”,";bs;”).” 
print "Welcher Bezirk wird 


gewuenscht”?” 

input "Koordinaten: senkr.,waager. ” 
2,8 

if z<1i or z’bz or s<1 or s>bs then 
print nd$:goto 165 
u=2*20:0=u-19:r=s*35:1=-r-34 

return 


rem spielfeldausgabe **+#rasnu00unnn 
print "[clr] ”;:n=®:x=B:y=19:gosub 
e58:if za<i1 then 182 

if 1108 then print "” ";:if 1<10 
then print ” ”; 

b$=str$ (1):print "Lwht] "”;b$; 

for s=l+1 to r:b$=rightS ( str$ (s), 
1):print ”Ccbm 6]”;:if b$="9®" then 
print "Luwht]”; 

print b$; :next s 

for z=-o to u:if z<108 then print ” ” 
;:if z<18 then print ” ”; 

print "C[Ccbm 69”;:if right$ ( str$ 
(z),1)="®” then print "Luwht]”; 
b$=str$ (z):print ” ”;b$;:Ffor s=l to 
r:if £f%(z,s)-® then print ”"C[Cblu].”;: 
goto 188 

print ”"[yell®”; :n=n+1 
next s:next z 

print "[cbm 6)J”;g;”. 
za; "Steine gesamt,” 


Generation:”; 


print ra;"am Rand, Bezirk”;u/29;,”/”; 

r/35;”:”";n;"Steine” 

return 

rem spielstein-eingabe **+##us.uuuu« 
print "Koordinaten: Zeile,Spalte 
<Return>” 

print "Koordinaten ausserhalb vom 


Spielfeld” 

print "[2spaces](z.B. 8,0) beendet 
die Eingabe.” 

input "Zeile,Spalte”;z,s’if z<l or 

z>ze or sl or s>sp then 197 

if p=1 then gosub 40 

za=za-f%(z,s):f%(z,s)=p:goto 194 

if p=1 then gosub 58 

gosub 68 

return 

rem aendern einer figur ***++senns.e 

zk=kz+l:zg=-gz-1:sk=-ks+1l:sg=-gs-1: 

print "[down]Ohne Aenderung anderer 
Felder ”; 

print ”sollen in folgends Felder 
Steine gesetzt werden: ”:p=1l:gosub 
198 

print "und Folgende Felder sollen 
leer sein: ":p=-®:gosub 198 

return 

rem startfigur “ara 
gosub 78:print ”"[down]JDas Spielfeld 
hat”;ze; "Zeilen"”:print ”und”;sp; 
"Spalten” 

if bz<2 and bs“2 then 215 

print "in”;bz;”(senkr.) mal”;bs; 
"(waager.) Bezirken” 

print "zu je 28 Zeilen und 35 
Spalten.” 

print ”[CdownlWollen Sie die 
Startfigur bestimmen? s” 


print "Oder soll das der Computer 
tun?[6spaces]c” 
input ” s/c ";b$:b$=left$ (b$,1):if 


b$<>"s” and bS<>”"c” 
if b$="c" then 230 


then 218 


1679 
7018 
4526 
3128 
3976 
3395 


3395 
142 


3580 
2881 
1348 
yızı 
1101 
3814 
3148 
4967 
1431 

2a 
4117 
5589 

142 
3633 
3777 
3341 
5131 

374 
3573 
1038 

441 

142 


6648 


5324 


4887 

142 
sı28 
1893 
5279 
3075 
3947 
3115 
4364 


1393 


ELTERN TER NE 


@un 77 


ne 


220 : 


ei 
Per 


et 
230 
234 


232 


234 
235 
236 
837 
e39 
240 
eul 
243 


244 
245 


E47 
248 
249 


250 
e51 


es2 


e33 


855 
2856 
857 
258 
859 
300 
301 
302 


303 


304 
305 
306 


307 
308 


print "[downlEingabe Ihrer 
Startfigur, die uebrigen” 

print ”"C2spaces)JFelder sind 
automatisch leer.”:p=l1:gosub 190: 
gosub 1408 


return 

rem computer-startfigur **+=+ruuaus 

print "[downlBitte geben Sie an, in 
welchem Teil des Spielfeldes die 
Startfigur”; 

print ” erzeugt wer- den soll, das 
ist zugleich das Ausmass[2spaces] 
der Figur.” 

print "Kleinste Zeile, in der sich 
ein Stein”:input "befinden soll”;zk 
if zk<1 or zk’ze then print nd$:goto 

234 

input "Grosesste Zeile”;zg:if zg<1 or 

zg’ze then print nd$:goto 236 

if zg‘zk then print "Kleinste Zeile 
kleiner/gleich grossste!”:goto 234 

input "Kleinste Spalte”;sk:if sk<1 

or sk>sp then print nd$:goto 239 

input "Groesste Spalte”;sg:if sg<1 

or sg>sp then print nd$:goto 240 

if sg‘sk then print "Kleinste Spalte 
kleiner/gleich groesste!”:goto 239 

print "Bei jedem Feld des 
definierten Rechteckswird durch 
Zufall entschi”; 

print ”eden, ob ein[3spaces]Stein 
eingesetzt wird. Bitte Angabe der” 


print ”Wahrscheinlichkeit fuer einen 
Stein:”:input "Zahl zwischen ® und 
ı »:p 


for z=zk to zg:for s=sk to sg: if p>= 

rnd (1) then f%(z,s)=1:za=za+1l 

next s:next z:gosub 50:gosub 68: 

gosub 1498 

return 

rem sound-routine “nn. nn.nnnaannn]. 

poke si+24,15:Ffor z=® to 50®:next z: 

poke si+4,17:poke si+11,17:poke si+ 
18,17 

for z=x to y:p=m%(®,z):gosub 258: 

poke si,lo:poke si+l,hi:gosub 258: 

poke si+7,1lo 

poke si+8,hi:gosub 258:poke si+14, 
lo:poke si+15,hi:for s=® to m%(l1,2): 

next s:next z 

poke si+t4,16:poke si+11,16:poke si+ 
18,16: for z=® to 1008:next z:z=® 

poke si+z,®:poke si+z+1,0:z=z+7: if 

z<=14 then 256 

poke si+24,d:return 

hi=int (p/255):1lo=p-hi*255:p=p*2 
return 

rem drucken “ee 
print ”[Cdown]Der aktuelle Bezirk 
wird ausgedruckt.” 

print "Geben Sie bitte Geraete- und 
Sekundaer- Adresse an!” 

print "ACHTUNG! Fehlerhafte Eingabe 
kann zuml 3spaces]Programm-Abbruch 
Fuehren!” 

print "C[Cdown]lGeraet angeschlossen 
und eingeschaltet?” 

input ”"Ja/neinT[l2spaces]j/n”;a$:if 
left$ (a$,1)<>"j” then return 

input "Geraete-Adresse” ;ga: input 
"Sekundaer-Adresse”;sa:ga=int (ga): 
sa-int (sa) 


open “4,ga,sa:cmd “4:print g;”. 
Generation: ”;za;”Steine gesamt,” 
print ra;”am Rand. Bezirk"”;u/20;”,"”; 
r/a910 20% 


n; "Steine” 


4194 
4940 


142 


6482 


5873 


5232 
2202 
4836 
5671 
4803 
Ss218 
S261 
5623 


4781 


6477 


4787 
1995 

142 
5065 


6264 


55393 


4383 
3713 

738 
3180 

142 
3788 
4370 


6622 


4132 
3601 
6335 


5307 


5541 


318 


3ıl 
ai2 
319 
800 
801 


822 


804 
818 


Bıl 


815 


816 
820 


821 


B22 
825 


826 


827 


839 


831 


832 


833 


834 


837 


838 
839 


840 


841 


gu2 


843 


844 


858 
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for z=o to u:for s"l to r:if: £%(z, 
s) then print ”®”;:goto 312 

BEZNE- 797753 

next s:print :next z:print#4:close 4 
return 


rem spielregeln “nn... 

print "[clr]Das Spiel beginnt mit 
dem Setzen von[4spaces]Steinen zu 
einer beliebige”; 

print ”"n Figur. Diesefigur und die 
Anzahl der Steine veraen- dern 
sich”; 

print " gemaess folgender Regeln:” 

print "[downlEin Stein stirbt, wenn 
sich in seiner[3spaces] 

Nachbarschaft weniger als”; 

print ” zwei oder mehrals drei 
Steine befinden. Andernfalls 
[3spacesJueberlebt er.” 

print "Befinden sich in der 
Nachbarschaft einesleeren Feldes 
genau drei ”; 

print "Steine, so wirdin dieses Feld 
ein neuer Stein hineinge-boren.” 

print ”[down]Diese Regeln werden auf 
alle Felder und Steine gleichzeitig 
angew”; 

print "endet, sodass[2spaces] 
jedesmal eine neue Figur 
C’Generation’[2spaces]genannt) ”; 

print "entsteht.”:gosub 158 

print "[Cclr]JWenn Sie zum erstenmal 
spielen, probie- ren Sie doch 
einmal diese”; 

print ” Figuren aus, [2spaces]Jund 
verfolgen Sie ihr Schicksal ueber 

[3spacesldie einzelne”; 


print ”n Generationen hinweg:[down, 

blu]” 

HEINE ” 

Beine ER [yel] 

GEBI) . Sn ‚Euellötbius. [yel]® 

£D1UJ.,.2* 

print ” „.LCyel]®000Cblu]....... [yel] 

BEDIUT, HE »sLuBlJBEHLUF ne. 

Cyel]820Cblu],.” 

BEINE 9) 22% uam el Wer 
ee BERRAE [yel]® 

blu]. ‚Cyell@Cblu]. 

DPINE. 

print ” 

BEINE, ? .Lyel]l9®20Cblu) 

print ” "LuelJ®00LbluI 

a rs a rue ei hyerhne [yellBLblul........ . 

£EyelJ®0Lblu]....” 

prine ” .Eyel]8808Cblu] 

RE EEE AR BIER CyellöLblul..... 

Eyell20Cblu]. 

DEIBE 2 Nena ‚Cuell®BOLbiul....... 

[yell@Cblu].. ‚Lyellölblul........ 

Cyell@lblul.....” 

BEINE Fast [yell280Cblu), 

£Eyel)3800000Chblul.....ccccce 0. 8 

BEIHt Ben [yell990C.blu] 

print *” 

‚Echm 63” 
print "[down]JNB: Verstreuen Sie 


Steine nicht wahllos” 


37937 


672 
171% 
142 
6403 
6189 


3319 
6159 


6849 


5768 


6317 
7036 


6587 


1773 
7354 


6218 


2877 


Sı61 


6203 


ssi2 


6062 


Sı61 


sı61 


5376 
60966 


5307 


6051 


Seß2 


seo 


5348 


4211 


18 (UM Oktober/87.. 


851 
852 
861 
862 


863 
864 


865 
B66 
867 


863 
878 
871 
872 
873 


874 


875 


876 
877 


878 
879 
880 
881 


882 
887 
| 888 


839 


831 
832 
833 


834 
895 
833 
929 
so1 


print "ueber das ganze Spielfeld, 
sonst erhoeht”; 

print "sich die Rechenzeit sehr 
stark.” 

gosub 158:print ”"C[Cclr]Zur Benutzung 
dieses Programms :” 

print ”[Cdown]Das Programm dient 
dazu, innerhalb ”; 

print "des[2spaces]Spielfeldes (”; 

ze; "Zeilen, ”;sp; "Spalten.”:print 
"Koordinaten - 1”; 

print ”"inke obere Ecke: 1 , 1 
[3spaces]- rechte untere Ecke: ”";ze; 
ap; die" 

print "Generationen einer Figur zu 
berechnen.” 

print "Cdown]NB: Am Rand verhaelt 
sich die Figur re- gelwidrig, ”; 

print "und zwar so, als ob jenseits 
des Randes nur leere Felder 
waeren.” 

print "[Cdown]Da das Spielfeld 
groesser ist als der[3spaces) 

Bildschirm, wird es in Bez”; 

print ”irke zu Je 28 Zeilen und 35 
Spalten aufgeteilt, Benen-nung der 
Bezi”; 

print "rke algebraisch von 1, 1 
[2spaces](links oben) bis”;bz;”,”; 

bs; "(rechts unt”; 

print "en) .[C2spaces]Beim Beginn 
einer neuen Figur sowie nachdem 
Verschieben ersch”; 

print "eint automatisch[3spacesIder 
Bezirk mit den meisten Steinen, 
[Sspaces]sonst im”; 

print "mer der, der auch schon zuvor 
[3spaces]sichtbar war.” 

gosub 158:print "Cclr]JVor, bzw. nach 
einer Generation haben[3spaces]Sie 
verschiedene ”; 

print "Moeglichkeiten:”:print "” 
[Cdown]s Start mit einer neuen Figur” 

print "a Ausbessern einzelner 
Felder”:print ”n Naechste 
Generation wird ber”; 

print "echnet[4spaces]Jm Mehrere 
Generationen hintereinander, 

[Sspaces/nur die zule”; 

print "tzt berechnete erscheint”: 

print "v Verschiebt alle Steine 
synchron im” 

print "C3spaces]Spielfeld”:print ”i 
Informiert ueber die Zahl von 
Steinen” 

print "[3spaces]Jin den einzelnen 
Bezirken"”:print ”b Bezirk Ihrer 
Wahl erscheint” 

print ”h diese Hinweise kommen 
erneut” 

print "d druckt den aktuellen Bezirk 
aus” 

print "e Endet das Programm” 


print "Cdown]Im vebrigen gibt Ihnen 
der Computer nochgenauere 
Informationen und”; 

print ” fragt Siel4spacesJnach 
einzelnen Befehlen,” 

print "[down]Die Spielanleitung 
nochmal: Taste h" 

print "Jede andere Taste startet das 
Programm.” 

get c$:if c$=""” then 894 

if c$=-"h"” then 808 

return 

rem data fuer sound *rr#uunuunnaue 


rem titelmusik 


U DNERUNEETER N Ehe BEN, 
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4178 
3186 
4374 
3624 


7017 


6098 


4598 
4856 


6703 


6280 


6655 


6105 


6837 


7134 


3859 


6831 


5359 
6593 


6303 


7302 


5552 


5678 


3526 
3481 
1861 


7249 


3258 
3661 
3548 
1768 


1308 
142 


se2 


903 
994 
905 
997 
308 


data 3215,100,3406,100,3215,100, 
e551,19008,2145,100 

data 1607,200,2025,209, 2145, 400 
rem spielfeldausgabe 

data 5407,200,4291,200,3215,400 
rem mehrere generationen 

data 10207,109,8583,208 


Leben im Computer mit dem Zellularautomat. 


Anzeigenschluß 


für die RUN Nr. 12/87 
ist der 6. Oktober 1987 


An 

Firma F.E.T. 

Füle Electronic Trading GmbH 

vom Rüsselsheimer Computer-Verein 


Wir, der Rüsselsheimer Computer-Verein, 
bekamen am 6. Juni 1986 von Ihrer Firma 
einen F.E.T.-PAL-Color-Digitizer für den 
COMMODORE (64 geliefert. 

Mit diesem Digitizer arbeiten wir im Verein 
regelmäßig, wir verleihen ihn an unsere 
Mitglieder, die damit sehr zufrieden sind. 
Alle Vereinsmitglieder wurden mit Ihrem 
Digitalisierer für den Commodore C64 digi- 
talisiert und anschließend in Farbe ausge- 
druckt. Auch Embleme, Vereinszeichen 
usw. wurden digitalisiert und ausge- 
druckt. Das Gerät arbeitet einwandfrei zu 
unserer vollsten Zufriedenheit. 


*Diese Zeilen erhielten wir von dem Rüssels- 
heimer Computer-Verein. Damit auch Sie bald 
zu den zufriedenen Kunden von F.E.T. gehören 


können, bieten wir Ihnen ab sofort an: 


1.000 F.E.T.-Pal-Color-Digitizer für 
Commodore C64 zum Superpreis 
von 299,00 DM incl. Software und 
Mehrwertsteuer zuzüglich Versand- 
spesen von 8,50 DM per Nachnahme 
oder Vorkasse (Euroscheck). 


Sollten mehr als 1.000 Bestellungen eingehen, 
entscheidet der Zeitpunkt des Eingangs der 
Bestellungen! 

Nach Abschluß der Aktion können Sie unseren 
F.E.T.-Pal-Color Digitizer für Commodore C64 
zu unserem üblichen Verkaufspreis von 399,00 
DM zuzüglich Versandspesen erhalten. 

Wir liefern Farbdigitizer auch für: 

ATARI 520 ST und SCHNEIDER CPC 6128. 


ET. 


Füle Electronic Trading GmbH 
Postfach 1425, 6057 Dietzenbach 1 
Telefon: 0 60 74/2 64 29 und 3 11 66 
Telex: 4 197 778 


4558 
8745 
2681 


2129 


gun 79 


er „Errorscanner“ ist 
für den C64 oder C128 
im C64-Modus mit den 
Floppies 1541, 1570 und 
1571 geschrieben. Die Programmab- 
schnitte zur Fehlererkennung laufen in 
der Floppy auf Job-Ebene ab, wo kei- 
ne automatische Fehlerkorrektur 
durch das DOS erfolgt. Bei einem 
Laufwerk mit verstelltem Kopf kön- 
nen daher Fehler angezeigt werden, 
die auf der Diskette gar nicht vorhan- 
den sind. 

Das Programm ist nicht zur Analyse 
von Disketten mit Kopierschutz be- 
stimmt. Killertracks, Halbspuren und 
dergleichen mehr, können daher nicht 
gelesen werden. 

Das Menü bietet zwei Möglichkeiten: 
© ganze Diskette scannen, 

e einen Blockheader scannen. 
Es liegt auf der Hand, daß diese Pro- 
grammteile sehr zeitkritisch sind. Sie 
sind daher in Maschinensprache ge- 
schrieben und werden in einem Flop- 
py-Puffer ausgeführt. Das ist möglich, 
weil die 1541 ein Laufwerk mit eige- 
nem Mikroprozessor und Betriebssy- 
stem ist. Der Computer braucht ledig- 
lich die Kommandos mit den dazuge- 
hörigen Parametern und Argumenten 
zu übermitteln. Der Basicanteil des 
Programms dient daher nur zur Ein- 
und Ausgabe und hat keinen Einfluß 
auf die Geschwindigkeit des Floppy- 
anteils. Die Text- und Hintergrundfar- 
ben wurden so gewählt, daß sie auch 
auf einem monochromen Monitor gut 
lesbar sind. Ist beim Scannen der Dis- 
kette ein Fehler aufgetreten, so wird 
angehalten und die Fehlermeldung 
und der Header ausgegeben. Das 
Scannen einer Diskette dauert je nach 
Anzahl der gefundenen Fehler zwei bis 
drei Minuten. 

Beim Scannen eines Headers gibt es 
die zusätzliche Möglichkeit, auch den 
Inhalt des Sektors zu zeigen. Die Aus- 
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Bei verschmutzten Disketten 
treten Lesefehler auf. Mit den 
Fehlermeldungen des DOS ist oft 
wenig anzufangen. „Errorscanner“ 
analysiert die Fehler und gibt die 
betreffenden Sektoren auf dem 
Bildschirm aus. 


gabe erfolgt hexadezimal und auch in 
ASCII. Nicht druckbare Codes wer- 
den durch Punkte ersetzt. 

Ein Sektor mit einem fehlerhaften 
Blockheader läßt sich auf normalem 
Weg nicht mehr lesen. Es wird daher 
vor dem Lesevorgang automatisch von 
der gewählten Sektornummer ein Off- 
set abgezogen und dieser Header gele- 
sen. Entsprechend dem gewählten 
Offset, übergeht der Scanner die fol- 
genden Blockheader bis zum ge- 
wünschten Datenblock. Durch diesen 
Trick lassen sich, von wenigen Aus- 
nahmen abgesehen, auch Sektoren mit 
zerstörten Headern lesen. 

Zur richtigen Anwendung sind aller- 
dings Kenntnisse über die Arbeitsweise 
des DOS (Disk Operating System) er- 
forderlich. Dazu die wichtigsten 
Grundlagen: 

Damit ein Sektor vom Diskcontroller 
gefunden werden kann, besitzt jeder 
Sektor einen Blockheader. Dieser ent- 
hält alle Informationen, welche vom 
DOS für das rasche Finden des Sek- 
tors gebraucht werden. Die Daten des 
zuletzt bearbeiteten Blockheaders wer- 
den in der Zeropage gespeichert: 
$12/13 — IDI und ID2 der Diskette 
im ASCII-Code. Diese werden bei der 
Initialisierung der Diskette vom Hea- 
der der Spur 18/Sektor 0 gelesen und 
hier als Standardwert abgespeichert. 
Auch der Blocksuchbefehl holt sich 
hier den Standardwert zum Vergleich 
mit der gelesenen ID. 

$16 — Erstes Zeichen der ID. 
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$17 — Zweites Zeichen der ID. 

18 — Spurnummer des Blocks. 
$19 — Sektornummer des Blocks. 
$1A — Prüfsumme über den Block- 
header. 
$38 — Kennzeichen $07 für den Be- 
ginn des Datenblocks. 
$39 — Kennzeichen $08 für den Be- 
ginn des Blockheaders. 
$47 — Aktuelles Kennzeichen für den 
Beginn des Datenblocks. Der normale 
Inhalt ist $07 (wie in $38) und kann 
vom Benutzer zum Erzeugen eines 
Read Error Nr. 22 verändert werden. 
Die auf der Diskette enthaltenen Da- 
ten sind nicht binär, sondern GCR-co- 
diert. GCR ist die Abkürzung für 
„Group Code Recording“. Vor dem 
Lesen eines Sektors werden die Para- 
meter in die Zeropage von $16 bis $1A 
(siehe oben) geschrieben, anschlie- 
ßend in den GCR-Code transformiert 
und ab $24 abgelegt. Der Diskcontrol- 
ler auf der Diskette sucht den Block- 
header und vergleicht ihn während des 
Lesens mit den gesetzten Parametern. 
Gibt es keine Übereinstimmung, so 
wird intern ein Fehlercode gesetzt. 
Dieser wird in eine Fehlermeldung um- 
gewandelt und in einem Puffer zur 
Ausgabe an den Computer bereitge- 
stellt. Nachfolgend eine Beschreibung 
der Fehlercodes, die nach der Ausfüh- 
rung eines Lese-Jobs auftreten kön- 
nen: 
20 — Header nicht gefunden: 
Findet der Diskcontroller bei der Su- 
che nach einem Sektor das Kennzei- 
chen „8“ für den Beginn des Blockhea- 
ders nicht, so wird der Blockheader 
nicht gefunden. Das deutet auf einen 
fehlerhaften oder zerstörten Header 
hin. 
21 — SYNC nicht gefunden: 
Der Beginn eines jeden Sektors wird 
durch die sogenannte SYNC-Markie- 
rung bestimmt. Wird sie auf der ange- 
steuerten Spur nicht gefunden, so wird 


diese Fehlermeldung ausgegeben. Hier 
gibt es mehrere Fehlerquellen: Eine 
defekte Diskette oder ein dejustierter 
Schreib-/Lesekopf können Grund für 
die Fehlersuche sein. 

22 — Datenblock nicht gefunden: 

Der Datenblock konnte nicht identifi- 
ziert werden, das heißt das Kennzei- 
chen „7“ wurde nicht gefunden (siehe 
Speicherstellen $38 und $47). Mit dem 
„Errorscanner* kann ein solcher 
Block fast immer gelesen werden. 

23 — Prüfsummenfehler im Daten- 
block: 

Der Block wurde zwar in den Puffer 
gelesen, doch stimmt die Prüfsumme 
über den Datenblock mit dem gelese- 
nen Wert nicht überein. Durch Kopie- 
ren und Korrektur der fehlerhaften 


Bytes kann der Block meist repariert 
werden. Wenn nicht, so ist die Disket- 
te defekt. Auch eine schlechte Erdung 
der Floppy kann die Ursache sein. 

27 — Prüfsummenfehler im Header: 
Der Wert in $1A stimmt mit dem gele- 
senen Wert nicht überein. Hier han- 
delt es sich in der Regel um eine defek- 
te (verschmutzte) Diskette. 

28 — Datenblock zu lang: 

Der Datenblock hat die SYNC-Mar- 
kierung überschrieben. Das deutet auf 
einen Hardwarefehler hin. 

29 — Falsche ID gefunden: 

Beim Formatieren der Diskette werden 
auch IDI und ID2 in jeden Blockhea- 
der geschrieben. Die gelesene ID 
stimmt nicht mit den Werten in $12/13 
überein. In der Regel wurde auf eine 
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Diskette zugegriffen, die vorher nicht 
initialisiert wurde. Hier kann es sich 
aber auch um einen zerstörten Block- 
header handeln. 

74 — Laufwerk nicht bereit. 

Keine Diskette im Laufwerk. Das Pro- 
gramm kann auch im C128-Modus 
lauffähig gemacht werden. Damit es 
gegenüber dem C64 einen Geschwin- 
digkeitsvorteil gibt, ist aber nur der 
80-Zeichen-Textmodus sinnvoll. Zur 
Adaption ist in das Listing eine Zeile 
einzufügen: 

1021 FAST: OPEN1,8,15,,U0>M; 
0“:CLOSE1 

Die 1541 ignoriert den UO-Befehl, aber 
eine 1570 oder 1571 wird damit in den 
1541-Modus versetzt. 

(Inge Wolf) O 


System: C64/C128 0448 ad 7e 04 Ida sector 
. 044b 85 09 sta $09 
Art: Anwendung Q44d a9 e® Ida #$e0 
Sprache: Basic/ Assembler O4at 85 91 sta 801 
Programmname: Errorscanner 0451 a5 91 w2 Ida $01 
EEE a Fe 0453 30 fc bmi w2 
0455 60 rts 
errorscanner-voi541 SIT T nenn nn nn nn 
(c) 1986 by ilse und rudolf wolf ;block auf job-ebene lesen 
smbiasnntun nun din EEE ae laen Janina nenn nn nn nn 
*= $0400 0456 a2 05 read® Idx #805 
IE TER Na nr 0458 Be 80 ®4 stx count 
;sektor mit header-fehler lesen 045b ad 7d 94 Ida track;block lesen 
) 7 om nn nn a Sinn oe ob lb EEE Q45e 85 06 sta $06 sund in puffer ® 
0400 20 ®a #5 jsr +150a ;blockheader lesen 0460 ad 7e 04 Ida sector ;ab #300 ablegen 
0403 a2 ®1 offset idx #801 ;soffset (variabel) 0463 85 07 sta $07 
0405 20 12 ®84 skiploop jsr skipbik 0465 a9 80 read lda #580 
0408 ca dex 0467 85 08 sta $00 
0409 d® fa bne skiploop 0469 a5 00 w3 Ida $08 
®40b a9 03 Ida #$03 ;pufferzeiger auf Q46b 30 fc bmi w3 
@40d 85 31 sta $31 ;$300 setzen 046d c9 21 emp #$01 
040 Ac da fü jmp $f4d4 ;block lesen O46t d® Bi bne next 
0471 60 rts 
0412 ad 88 ic skipbik Ida $1c0® ;offset ausfuehren 
0415 10 fb bpl skipbik 
0417 a9 d® synci Ida #$d® ;sync abwarten 
0419 8d 05 18 sta $1805 
®4ic 20 085 18 geti bit $1805 
o41lf 10 60 bpl timeout 
0421 2c 88 Ic bit $1c0®8 
0424 30 f6 bmi geti 
0426 ad Bi Ic Ida $1c01 
0429 b8 clv 0472 a® 00 next Idy #500 
042a ad 00 ic wi Ida $1008 0474 88 loop dey 
042d 10 fb bpl wi 0475 d® fd bne loop 
0421 a9 d® sync2 Ida #$d® ;sync abwarten 0477 ce 80 04 dec count 
0431 8d 085 18 sta $1805 047a d® e9 bne read 
0434 2c 05 18 get2 bit $1805 0470 60 rts 
0437 10 48 bpi timeout 
0439 20 08 ic bit $1088 ;parameter 
®43c 30 16 bni get2 ®47d 00 track ‚byte $08 
®43e ad ®1 ic Ida $1c®1 ®47e 00 sector ‚byte $00 
0441 b8 elv 047 14 maximum .byte $14 ;max. sektoren/spur 
0442 60 rts 0480 05 count ‚byte #05 
0443 ad 7d 04 start Ida track programm im 0481 a9 03 timeout Ida #$03 ;sync nicht gefunden 
0446 85 08 sta $08 ;puffer 1 starten 0483 4c 69 19 jmp #f969; jobschleife verlassen 
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1079 
10888 
1239 


a9 ®1 scan Ida #$01 
8d 7d 04 sta track 
a9 15 Ida #$15 ;sektoren bis spur 17 
8d 7f 04 sta maximum 
a9 008 Ida #$0® 
8d 7e 84 sta sector 
ad 7d 4 test Ida track ;job vorbereiten und 
85 06 sta $06 ;block lesen 
ad 7e ®4 Ida sector 
85 07 sta $07 
a9 80 Ida #$80 
85 00 sta #00 
a5 00 wait Ida #08 
30 fc bmi wait 
c9 81 cmp #$01 
do 29 bne exit ;stop wenn fehler 
ae 7e ®d4 trap Idx sector ;start nach fehler 
ed inx 
8e 7e ®4 stx sector 
ec 71 04 cpx maximum 
bo 03 bcs update 
4c 95 04 jmp test 
a2 00 update ldx #$0® ;update der parameter 
Be 7e ®4 stx sector 
ae 7d ®4 ldx track 
ed inx 
Be 7d 04 stx track 
ed 24 cpx ##24 
t® da beq exit ;diskette gescannt? 
8a txa 
20 4b f2 jsr $f24b 
8d 7f 04 sta maximum 
4c 95 04 jmp test 
60 exit rts 
*= $90500 
jan 
;headerscanner 
j---u- nn .: 
;header lesen 
a2 90 idx #890 ;leseversuche 
86 4b stx $4b 
a9 52 repeat Ida #$852 ;ger-code $08 
85 24 sta $24 
a9 d® Ida #$d® 


1$5=chr$ (147):rem home/clr 

g$=-chr$ (158):rem gelb 

w$=chr$5 (5):rem weiss 

d$=chr$ (17):rem cursor nach unten 
print g$;1$ 

2$=chr& (0):c$="8123456789abcedef” 
dim b1$(8),b2$(8),m$(16) 


1100 : 

rem >maschinenprogramm in den floppy 
-puffer lesen“ 

open 1,8,15,”"i®”:print ” bitte 
warten ...” 

For i=® to 15:read m$(Ci):next 
ps"B:for i-® to 212:read d:ps=ps+d 


1110 
1129 


1130 
1140 
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C 
ı 


305 
837 
822 
983 
984 
2507 
2083 


3408 


1714 
2541 


059a 
050d 
0510 
0512 
0515 
0517 
o51a 
05ib 
851d 
o5if 
0529 
0523 
0525 
0527 
0529 
052a 
052d 
0530 
0531 
0533 
0535 
0538 
053a 
053c 
053e 
0540 
0542 
0544 
0547 
0549 
054b 
054d 
0541 
0551 
0554 
0557 
0559 


055c 
a55t 
| 561 
0564 
0566 
0568 
056a 
056c 
056e 


056f 
0570 
0571 


1150 
1168 


1172 
118® 


1198 


8d 05 18 sta $1805 
2c 05 18 getsync bit $1805 ;auf sync warten 
10 45 bpi timeout 
2c 08 ic bit $1c0® 
30 f6 bmi getsync 
ad ®1 Ic Ida $1c®1 
b8 elv 
a0 08 Idy #300 
50 fe wait! bve waiti 
b8 elv 
ad ®i ic Ida $1c®i ;byte holen 
c5 24 cmp $24 jist es B? 
d® ı7 bne trynext 
50 fe wait2 bvc wait2 
b8 elv 
ad di ic Ida $ic®i ;header lesen 
99 25 00 sta $25,y ;speichern 
c8 iny 
co 07 cpy #507 
do f2 bne wait2 
20 97 f4 jsr $f497 ;ger in bin wandeln 
a5 19 Ida #19 
c9 08 test cmp #400 ;sektornummer 
to 09 beg getcksum 
c6 4b trynext dec $4b 
d® c2 bne repeat 
a9 02 lda #$02 ;header nicht gefunden 
40 69 9 jmp #969 
a9 00 getcksum Ida #500 ;pruefsumme bilden 
45 16 eor $16 
45 17 eor $17 
45 18 eor $18 
45 19 eor #19 
8d 71 05 sta cksum ;pruefsumme speichern 
4c 9e fd jap $fd9e;jobschleife verlassen 
a9 03 timeout Ida #$03 
40 69 f9 jap #969 
;programnstart 
ad 6f 05 jobstart Ida track 
85 da sta $0a 
ad 70 85 Ida sector 
85 0b sta $0b 
a9 e® ida #$e® ;jobcode 
85 02 sta $02 ;fuer puffer 2 (500) 
a5 02 wait3 Ida #82 
30 fc bmi wait3 
6® rts 
12 track ‚byte $12 
08 sector ‚byte #00 
00 cksum ‚byte $00 ;pruefsumme 


print#1,”m-w”" chr$ (Ci) chr$ (4) chr$ 
(1) chr$ (d}:next 

if ps<>20978 then print 
"eingabefehleri1”:close 1:end 
ps=®:for i=® to 113:read d:ps=ps+d 
print#1,”m-w” chr$ (i) chr$ (5) chr$ 
(1) chr$ (d):next 

if ps<>1170®8 then print 
»’eingabefehler2”:close l1:end 


1200 : 


1218 
1220 
1230 
1249 
1258 
12698 
12708 
12898 


12908 


rem >menuet 

print w$;1$ 

print "[Cdoun]J] menue :”g$ 

print ” 1-ganze diskette scannen” 
print ” 2-einen blockheader scannen” 
print ” leertaste beendet" 

get q$:if q$="” then 1278 

if q$=-"” ” then close 1:print 1$;chr$ 
(154):end 

if q$="1” then gosub 1679:goto 1228 


2634 
39088 


2553 
2698 


3108 


1016 
1221 
2903 
3539 
1991 
1674 
313% 


2319 
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1388 print#1,”i®”":print w$; 1450 1858 : 
1318 input ”C[clr,down] spur,sektor ”;t,s: 3095 1868 rem >sektor lesen‘ 
print g$; 1878 print#1,”i®” 733 
1328 n=208:if t>17 then n"1B:if t>24 then 4368 1888 print#1,”m-w” chr$ (125) chr$ (4) 23966 
n=17:if t>30 then n=16 chr$ (2) chr$ (t) chr$ (s) 
13380 if t>35 or s>n then input ” spur, 4168 1898 print#1,”m-e” chr$ (B6) chr$ (4) 2063 
sektor ";t,s:goto 1328 1988 print#1,”m-r” chr$ (56928 chr$ (1): 4516 
1340 : get #1,dk$:dk=asc (dkS+z$) 
1350 rem >initialisierte id und sektor le 19128 print#1, ”m-r"2$;2$;chr$ (1):get #1, 3702 
sent £S:F=-asc (f$+zZ$) 
1368 print#1,”m-r” chr$ (18);z$;chr$ (2): 4444 1928 if dk<>7 then print#1,”m-w” chr$ 3585 
get #1, j1$, j2$:gosub 1878 (71)2$ chr$ (1) chr$ (7) 
1378 gosub 2018 573 1938 return 142 
1388 e=-f:if f=-4 then gosub 1842 1642 1940 : 
1398 gosub 1960: if f=2 or t<>hd(2) or s<> 3330 1958 rem >Ffehlerhaften header lesen“ 
hd(3) then 1648 1968 print#1,”i®” 733 
1408 : 1978 print#1,”m-w” chr$ (111) chr$ (5) 2895 
1418 rem >ermittelte daten ausgeben“ chr$ (2) chr$ (t) chr$ (s) 
1428 print ”[down] initialisietrte id 2603 1988 print#1,”m-w” chr$ (59) chr$ (5) 3395 
(812/13): ” cehr$& (1) chr$ (s) 
1438 print ” id=[rvs]”j1$; JES”Loff)”;” 4231 
idi-[rvs)”’J1$”[loff]" asc (j1$+z$); 
1448 print ” id2=-[rvs]”jJ2$"Loff]” asc 2238 1998 print#1,"m-e” chr$ (92) chr$ (5) 2169 
(J2$+z$) 28082 print#1,"m-r” chr$ (2328 chrS (1): 3774 
14580 print w$’Cdounlheaderanal 1915 get #1,f3:f-asc (f$+z$) 
use :”g$ 2210 a-22:for i-® to 4 1222 
1460 if F<>i1 then print ” status:[rvs]” 2353 2028 print#1,”m-r” chr$ (Ca+i) chr$ (8) 3388 
mS(f) chr& (1):get #1,q$:hd$Ci)=q$ 
1478 print ” gelesene id ($16/17):" 2294 2030 hdli)=asc (Chd$li)+z$):next 2058 
1488 print ” id=-[rvs]"”;hd$(8);hd$C1);” 3996 2048 print#1,”m-r” chr$ (113);chr$ (5) 8732 
Loff)”;" idi-[rvsI”hd$co)”loff)” chr$ (1) 
hd(0); 2050 get #1,4$:cks=-asc (q$+z$):return 2510 
1498 print ” id2=[rvs]"hd$t1)”CloffJ”hdti) 1659 2060 : 
1508 if J1$<>nd$(0) or J2$S<>hd$c1) then 2308 2078 rem >sektor mit headerfehler lesen< 
print ” Crvs]"m$(11) 2888 if e=1 then 2230 1149 
1518 print ” spur($18)[L2spaces]-";hdt2): 4651 2098 input " offset (1-3)L3spaces]i 3275 
print ” sektor($19)=";hd(3) C3left]”;v 
1528 print ” pruefsummel 3spaces] (aus 2966 2108 sv-s-v:if sv>=-® then 2150 2628 
$1a)=";hdcH) @1l1l® n=-28:if t>17 then n-1B:if t>24 then 4368 
1538 print ” pruesfsumme (errechnet)=";cks 3108 n=17:if t>30 then n=16 
1548 if cks<“>hdl4H) then print ” [rvs)” 1825 2E12B if s-® then sv-n-v+1 1460 
mS(9) 2130 if sv=-2 then sv=n-l:goto 21590 2098 
1558 if e=4 then print ” [rvs) 4246 2E14M® if s>d then sven 1176 
datenheaderkennung-"dk” statt 7" 2158 print#1,”m-w” chr$ (125) chr$ (4) 3205 
1568 if fl then 1798 748 chr$ (2) chr$ (t) chr$ (sv) 
1578 print w$; 688 2168 print#1,”m-w” chr$ (4) chr$ (4) chr$ 2874 
1588 input ”"[down] sektor zeigen? (J/n) 4124 (1) chr$ (vw) 
C3spaces]n[3left]”;q$ 2178 print#1,”"m-e” chr$ (67) chr$ (4) 2069 
1598 print g$; 656 2188 print#1,”m-r” chr$ (1)z$ chr$ (1) 2222 
1608 if q$="j” then gosub 2088 1677 2198 get #1,Ff$:F-asc (f$+tz$):if £>127 3037 
1618 input ” noch einen sektor? (3J/n) 3986 then 21608 
C2spaces]j[3left]”;q$ 2208 if £-3 then print "status: "m&(f): BiH7 
1628 if q$="n" then 1228 1654 goto 2480 
1638 print ”"[clr]”:goto 1308 921 2210 : 
1648 print ” header kann nicht gelesen 4386 2220 rem >sektor zeigen“ 
werden"”:if fl then 179308 2238 print "[clr,doun) spur”;t; ”[2spaces) 2792 
1658 goto 1580 643 sektor”;s; 
1660 : 2240 print w$”C2spacesJabbruch mit +«"g$ 1869 
1678 rem >diskette scannen< 22508 ad-®d:z1l-®:n=B: for i-l to 32 2192 
16880 fl-1:print "Cclr,down] scanning...”: 4951 2268 For j-1 to B:print#1,”m-r” chr$ (n) 3198 
print#1,”m-e” chr$ (134) chr$ (4) chr$ (3) chr$& (1) 
1698 rem 2270 get #1,a$:b2$(jJ)-a$:d-asc (a$+tz$):n= 3389 
17808 print#1,”m-r” chr$ (8) chr$ (®) chr$ 2366 n+1 
(1) 2288 if d<33 or d>127 then b2$ly)=-"," 2174 
1710 get #1,Ff$:f-asc (f$+chr$ (0)) 2168 2298 gosub 2388:b1$(j)=h$ 1299 
1728 print#1,”"m-r” chr$ (125) chr$ (4) 2288 2308 next :d-ad:gosub 2380:print h$;” : " 3912 
chr$ (2) ;:ad=-ad+B 
1738 get #1,t$,s$:t=asc (t$+chr$ (0)):s- 3874 2318 for j=1 to B:print b1$()J);” ”;:next 3039 
asc (s$+chr$ (0)) vnrint "> 
1748 if t=36 then Fl=®:return 1810 2320 for j-1 to 8:print b2$(CyJ);:next : 2202 
1758 gosub 187®:ifF f=1 then 17708 1911 print 
1768 print "[clr] "m$(f);t;s:gosub 1360 2203 2330 zl-zi+1:if zl>17 then zli=d:gosub 3154 
1778 print "[clr,down)scanning...” 1623 2438 
1788 print#1,”m-e” chr$ (171) chr$ (4): 2656 2340 get a$:if q$="«"” then i=32:q45="j” 2640 
goto 1698 2358 next :print :return 789 
1798 print "[down] weiter mit leertaste” 2283 2360 : 
1808 get k$:if k$=""” then 1800 1597 2378 rem >dez nach hex wandeln“ 
1818 print ”[clr]”:return 688 2388 h$="":h=16 732 
1820 : 2398 c=-int (d/h):d=d-h*c:h$=h$+mid$ C(c$, 3502 
1830 rem >read error 22 behandeln“ c+1,1) 
1848 print#1,”m-w” chr& (56)2$ chr$ (1) 3163 2400 h=h/16:if h>=1 then 2399 1981 
chr$ (dk) 2418 return 142 
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2420 : 2710 data 208,141,5,24,44,5,24,16,72,44, 4612 
24380 print ” weiter mit leertaste - 3038 0,28,48,246,173,1 
abbruch mit +” 2720 data 28,184,96,173,125,4,133,8,173, 5751 
2449 get k$:if k$="" then 2440 1669 126,1:133,9,169,c024,133 
2459 IF kS=-"«-" then i=32:98="j"” 2342 2730 data 1,165,1,48,252,96,162,5,142, 5584 
2460 return 142 329,4,173,125.4,.133,6 
e470 : 27408 data 173,126,4,133,7,169,128,133,0, 56208 
2488 print ” kann nicht gelesen werden- 4437 165,0,48,252,201,1,208 
noch einen” 2750 data 1,96,160,0,136,208,253,206,128, 5269 
2498 q$="":input ” versuch mit andrem 5296 4,208,233,96,0,0,28 
offset( J/n)[L3spaces)J[LF3left]”;q$ 2760 data 5,169,3,76,105,249,169,1,1“41, 4975 
195,2,169,23, 141, 987,4 
i SRRÄREN ra 2778 data 169,90,141,126,4,173,125,4,133, 5688 
2590 u 3” then print#1,"i®":goto 2443 5,173,128,4,133,7.169 
2510 if q$<>”j” then return 1056 2788 data 128,133,0,165,20,48,252,201,1, 5987 
a2: 208,41,174,126,4,232,142 
BE 2530 : 2738 data 126,4,236,127,%,176,3,78,149,4,. 753064 
= 2548 data fehler nicht definiert 2316 162,8,142,126,4,174 
2558 data B-kein fehler 1145 2800 data 125, 4,232, 148, 109,4, 0287.35, E40, 5834 
2568 data 20-header nicht gefunden 2342 20,130,30,75, CHE, 241.107 
2578 data 21-sync nicht gefunden 2184 2810 data 4,76,1493,4,96 1725 
= 2588 data 22-datenblock nicht gefunden 2697 2eB20 : 
= 2598 data 23-pruefsumme im datenblock 2345 2838 data 162,144,134,75,169,82,133,36, s664 
26008 data 24-recodierfehler 2a62 169,208,141,5,24,44,5,c4 
26108 data 25-verify-Fehler 1963 2840 data 16,69,44,0,28,48,246,173,1,28, 4493 
= 2620 data 26-diskette schreibgeschuetzt 2313 184,162,0,80,254,184 
= 26308 data ?27-pruefsumme im header 2344 2858 data 173,1,28,197,36,208,23,80,254, 5957 
= 2640 data 28-datenblock zu lang 2039 184,173,1,28,153,37,0 
" 26508 data 29-falsche id im header, ?,?,? 2486 2860 data 200,132,7,208,242,32,151,244, 5731 
= 2660 data 74-keine diskette im drive 2521 165,25,201,0,240,9,198,75 
3670. 2878 data 208,154,169,2,76,105,249,169,0, 5752 
2680 data 32,10,245,162,1,32,18,4,2e2, 4890 R 693,22,69,23,69,24,69 
ü 208,259,169,3,133,49,76 2880 data 25,141,113,5,76,158,253,169,3, 63907 
= 2690 data 212,244,173,0,28,16,251,169, 5800 76,105,249,173,111,5,133 
ei 208,141,5,24,44,5,24,16 2838 data 10,173,112,5,133,11,169, 224, 6176 
? 2700 data S6,44,0,28,48,2456,173,1,28,184, 4651 133,2,169,2,420,252,96,18 
173,0,28,16,251,169 2908 data 8,8 532 


Basicprogramm mit Data-Lader für die Maschinenroutinen von „Errorscanner“. Diskettenfehler lassen sich mit diesem Programm aufspüren. 


NAGCHWUGHO-PIGAdoDo 
oIND GEFRAGT 


insel, Sprühdose und 
Zeichenstifte — das ist 
noch lange nicht alles, 


Spacetaste wird ein Punkt gesetzt, mit 
„.“ wieder gelöscht. Der ganze Grafik- 
schirm läßt sich mit SHIFT CLR/ 


„Picture Paint“ ist ein 
umfassendes Malprogramm für 


was Picture Paint simu- 
liert. Neben den Standardfunktionen 
wie Linien ziehen, Kreise malen und 
Flächen ausfüllen, beherrscht das Pro- 
gramm noch einige exotische Funktio- 
nen. So können auf Tastendruck 3D- 
Darstellung von Würfeln und Qua- 
dern erreicht oder Koordinatensyste- 
me in das Bild gezeichnet werden. 

Nach dem Starten des Programms er- 
scheint das Hauptmenü. Die ersten 
beiden Punkte — Bild erstellen und 
verändern — sind noch in Untermenüs 
aufgeteilt. Alle anderen Funktionen, 
wie Bild laden und speichern, Disket- 
tenoperationen und Beenden, benöti- 
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den 6128. Etliche Funktionen, 
die man bei den herkömmlichen 
Malprogrammen vermißt, sind 
hier zusammengefaßt. Selbst 
3D-Darstellung läßt sich auf 
Tastendruck erzeugen. 


gen keine weitere Erklärung. 

Der sechste Punkt — Hardcopy — 
funktioniert erst, wenn man eine eige- 
ne Routine in das Programm einbin- 
det. Wählt man nun den Menüpunkt 
1, befindet man sich im Grafikmodus. 
Der Zeichencursor kann mit den Cur- 
sortasten verschoben werden. Mit der 


HOME löschen. Zwei unterschiedli- 
che Malgeschwindigkeiten stehen zur 
Verfügung: der Fast-Modus und der 
Slow-Modus. Im Fast-Modus (F) geht 
der Cursor im 10-Pixel-Schritt in die 
jeweilige Richtung — im Slow-Modus 
(S) wird jedes Pixel abgetastet. Dauer- 
malen wird mit „D“ eingeschaltet. 
Über die „M“-Taste gelangt man ins 
Grafikmenü: 

Linie, Kreis, Viereck 

Der erste Malpunkt der angewählten 
Funktion wird mit der Spacetaste 
festgelegt. Der Endpunkt wird mit 
RETURN bestätigt. Zum Beenden der 
Funktionen „E“-Taste drücken. 


Ausmalen, Text 

Eine Eingabe muß mit RETURN be- 
stätigt werden. 

Kopieren, Drehen, Spiegeln 

Die obere linke Ecke des ausgewählten 
Bereiches wird mit RETURN festge- 
legt, die untere mit SPACE. Bei dem 
Kopieren wird der Ausschnitt mit „;“ 
wiedergegeben. Zum Beenden dieser 
Funktionen wird wiederum „E“ einge- 
geben. 

Strichstärke 

Die doppelte und die einfache Strich- 
stärke ist möglich. 

Sprühdose 1,2 

Mit RETURN wird der Spritz-Modus 
aktiviert. Die Sprühdose 2 bemalt eine 


gelangt man wieder in den normalen 
Modus. 


Pinsel 1,2,3 

Mal-Modus an/aus mit RETURN. Bei 
Pinsel 1 und 2 können neue Malmuster 
mit der Space- und der „.“-Taste ange- 
wählt werden. 


Vergrößern 
Die linke obere Ecke des zu vergrö- 
ßernden Ausschnittes wird mit RE- 
TURN festgelegt, die rechte untere 
mit SPACE. 


Koordinatensystem 

Der Mittelpunkt des Koordinatensy- 
stems wird mit RETURN fixiert; der 
größte x-Achsenpunkt mit SPACE; 
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Scrollen 
Die Scrollrichtung ist mit den Cursor- 
tasten zu bestimmen. Der Bildschirm 
wird jeweils um 20 Bildpunkte ver- 
schoben. 


Würfel, Quader in 3D 

Hier muß nur die Vorderseite der 3D- 
Darstellung bestimmt werden. Die lin- 
ke obere Ecke wird mit RETURN fi- 
xiert, die rechte untere mit SPACE. 


Symmetrisches Malen 1,2. 

Die Funktion wird mit RETURN ein- 
geschaltet. Beim Malen wird nun 
gleichzeitig an einer Symmetrieachse 
gespiegelt. 


größere Fläche als die erste. Mit „E“ der größte y-Achsenpunkt mit „;“. (L. Heiermann) O 


System : C128/Floppy sie get Ey aa$ Bi 
. 4 scnelr 
Art : Anwender 430 char ‚15,0, "+*»MENUE«e"" 2272 
Sprache : Basic 4498 print :print :print :print ” 1) Bild 2543 
Programmname: Picture Paint erstellen[4spaces]" 
458 print :print ” 2) Bild veraendern 2146 
[3spaces]” 
1088 graphic 1,1:h%-10: Fast :mf-1 2138 460 print :print ” 3) Bild speichern 2071 
118 for i=® to 18 step 4 994 [4spaces)” 
120 draw ‚i,® to 8,i1,1,10 to 10,i 1322 478 print :print ” 4) Bild laden 1906 
138 next :sshape td$,0,0,10,12:scncelr 1 1992 [Bspaces)” 
148 for i=-2 to 10 step 2 10088 488 print :print ” 5) Bild ansehen 2037 
159 drau ‚®,i to 4,i-2,6,i to 18,i-2 2441 [6spaces]” 
160 next :sshape dt$,0,0,19,1® 1352 498 print :print ” 6) 2568 
172 graphic 1,1:color ®,1:color 1,2: 6145 Diskettenoperation"” 
senclr :graphic ®:dim zb$C200):dim 508 print :print ” 7) Hardcopy[L1@spacesJ 2111 
y1l8):za=1:dim bn(11) ” 
189 trap 9840: za=1:v=-5:dim ab$(50) 8771 S12 print :print ” 8) Beenden[i1spaces]” 1848 
198 for i-2 to 11:bn(i)=B®:next 1628 5208 char ,‚11,20,ds$ 1321 
208 dim sz$(20,2):1z=1 1461 538 print :print :print "[2right,rvs] 4080 
210 dim al$(c200):dim ap$Cc2008):dim 2745 Bitte treffen Sie eine Auswahlloff)” 
yx$(209,11) 549 get key aa$:aa-val (aa): if aa<cli or 2939 
220 restore 3900 614 aa>B then 540 
230 For x=3583 to 3776 1594 SS® on aa gosub 940,580,590,670,770,800, 3594 
2408 read a:cs=cs+ta:poke x,a 2185 9620,5798 
858 next x:slow 883 S68 goto 429 578 
E68 if cs<>158B6 then print chr$ (7);: 1678 578 scenelr :input ”"Sicher($J/n)”;jh$:if 4158 
list Jh$="n" then return :else sys 57344 
278 J1$=-"**Disk Operation**" 2371 588 graphic 1:goto 969 985 
2808 a$="Lars Heiermann” 1968 SS® scnclr :char ‚12,08, ”**BILD 2825 
298 print chr$ (14);chr$ (27)+"e”;chr$ 2769 SPEICHERN*#" 
(1475 608 print :input "Filename”;f$ 1241 
308 color ®,1:color 4,1:color 5,8 1784 6198 print :char ‚15,4, "Bitte warten”, 1 2164 
318 print "rensansassassgıjpER 4232 620 bsave (f$),on bO,p8192 to p16192 2445 
PAINTHWR nennen” 638 if ds<>® then begin :char ‚10,7,ds$, 1983 
3228 print 3764 1 
RER  DOHH Sana 648 char ‚198,13, "Nochmal (j/n)"”:get key 2998 
“..n ns 
330 print 4030 650 if n$=")j"” then 590:else bend 1996 
EEE EI EI EI ES ren 668 return 142 
“rn 678 scnelr IR 
348 print :print "[2rightlWritten by” 1992 688 char ‚12,0,”***BILD LADEN**«" 2463 
358 char ‚13,5,a$,1 1512 698 print :input ”"Filename”;f$ 1241 
368 print :print :print :print :print ” 4584 788 print :char ‚15,4,”Bitte warten”,1 2164 
[l4rightlVersion 3.9” 710 bload (f$),p8132 1179 
378 print :print "[2rightlJVerbesserte 4884 720 if ds<>® then begin :char ‚10,7,dss, 1983 
Ausfuehrung vom 6.6.1987” ı 
380 : 738 char ‚18,13, "Nochmal (3/n)” 2467 
398 print :char ‚10,14,”NO RIGHTS 3572 748 get key n$:if n$="j" then 678:else 2848 
RESERVED”,1 bend :return 
400 char ‚8,20, "Bitte Taste druecken!!”, 2861 758 print :print ” Bild geladen”:sleep 2 2087 
& 768 return 142 


>» 


Oktober/87 Kun 85 


NETTER N De, 


770 
780 
7390 
800 
810 
820 


830 
840 
850 


860 


870 
882 
830 
s20 


310 
320 
339 
340 


950 
2121) 


970 

380 

330 
1000 
1010 
1020 
1030 
1040 
1050 
1068 
1070 
1088 
1030 
1128 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
12208 
1210 
1220 
1230 
1240 
1250 


1260 


1270 
1280 


graphic 1 

get key aa$:graphic 2,1 

return 

scnclr 

graphic ® 

char ‚13,0, ”**DISKLshift-space) 
OPERATION**" 


print =präntızprints:print ” 17 
Formatieren[Bspaces)” 

print vprint ” ©) 
Inhaltsverzeichnis” 

print :print ” 3) File loeschen 

[5spaces)” 


print :print ” 4) File umbennen 
[5spaces)” 

print :print ” 5) Zurueck[i11spaces]” 
char ‚13,17,ds$,1 

char ,‚11,15,”-Bitte auswaehlen-”,1 
get key bb$:bb=val (bb$): if bb<1 or 
bb’>5 then 3908 

on bb gosub 9130, 9240, 3330, 9430,33 
goto 808 

goto 428 

eulor T,1:£0lor 1,2:80108 7,1: 
graphic 1,1 

senclr 

movspr 1,174,141:sprite 1,1,8,0,0,0, 
®:locate 160,1980:x=-160:y-=188 

locate 160,188 

get key ac$:rem punkt malen 

:if ac$=-"Lup]” then y-y-1:movspr 1,*+ 
®,-1:goto 988 

if ac$=-"[down]” then y=y*+1:movspr 1, 
+Bd,+l:goto 988 

if ac$="[left]” then x=x-1:movspr 1, 
-1,+8:goto 988 

if ac$="[right]" then x=x+1l:movspr 
1,+1,+®:goto 988 

if ac$=-"f” then gosub 9549 


if ac$=" ” then draw ‚x,y 

if ac$="d” then 90408 

if ac$=",” then draw 8,x,y 
if ac$="[Cclr]” then scnclr 
if ac$="m” then 1118 


goto 988 


char ‚8,19,”":print "1l)Linie 
[2spaces]2)Viereck[2spaces)3)Kreis 
C2spaces]4) Farben” 

print "S)IInvertieren[2spaces)]) 
6)Zurueck zum Hauptmenue” 

print ”"7)Zurueck zum Malen[2spaces) 
BSiAusmalen ” 

print ”9)Blaettern” 

print "[C39spaces)” 

graphic 2,0,19 

get key c$:c=val (c$):if c=® then 
1170 

on c gosub 1200,1340,1510,1730,181®, 
1888, 1890, 1908,2418 

goto 1198 

graphic 1:rem linie 

mf=-1:get key ac$ 

if ac$=-"[up)” then y=-y-1:movspr 1,+ 
®,-1:goto 121® 
if ac$="Cdown])” 
+d,+1:goto 1218 
if ac$-"L[left]” 
-1,+8:goto 12108 
if ac$="[right]” then x=x+1:movspr 
1,+1,+8:goto 1218 

if ac$=chr$5 (13) then d=-x:g=y:movspr 
2,d+14,g*+41:sprite 2,1,8,0,0,0,0: 
goto 12108 

if ac$="” ” then xx=x:yy=y:draw mf,d, 
g to xx ,uy:d=-x:g=-y:goto 1218 

if ac$="e” then sprite 2,8:return 


then y=y+1:movspr 1, 


then x=x-1:movspr 1, 


320 
SpS 
142 
232 
318 
2743 


2803 
2603 
2303 


2149 


2178 
1614 
2885 
2817 


8771 
578 
578 

2459 


232 
sı02 


s41 

572 
2834 
3061 
2338 
esy2 
1252 
1428 
1897 
1593 
19047 
1127 

604 


3812 


5228 
3674 
1660 
1588 

937 
2668 
4255 

563 

s52 
1196 
3115 
3003 
2940 
2884 


5315 


5416 
1539 


1298 
1309 


1319 
1328 


1330 
1348 
1350 
1360 


1378 
1380 
1392 
1400 
1410 
1420 
1439 
1440 


1450 
1460 


1470 


1480 


1490 
1500 
1510 
1520 
1530 


1549 
1550 
1569 
1578 


1580 


1599 
1500 
1618 


1629 
1630 
1640 


1658 
1660 


1678 
16808 
1690 
17908 


1718 
17208 
1738 
1740 


1758 
1760 
1770 
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if ac$=-"f” then gosub 9549 
if ac$=-"[Cclr]” then scnelr 
1218 

if ac$=-";” then draw mf,d,g to x,y 
if ac$=-"m” then mf-mf+1l:if mf>1 then 
mf-d:goto 1210 

goto 1210 

graphic 1:rem viereck 

:get key ac$ 

if ac$=-"[Lup)” then y=-y-1:movspr 1,*+ 
8,-1:goto 13598 

if ac$=-"[Cdown]” then y=y+l:movspr 1, 
+d,+1:goto 1358 

if ac$="[Cleft]” then x=x-1:movspr 1, 
-1,+8:goto 1350 

if ac$-"[right]” then x=x+1:movspr 
1,+1,+0:goto 1358 

if ac$=chr$ (13) then g=x:f=y:movspr 
e,g+14,f+41:sprite 2,1,8,0,0,0,0: 
goto 1358 

if ac$=-" " then xx=x:yy=y:goto 1458 
if ac$=-"e"” then sprite 2,d:return 

if ac$="f” then gosub 9540 


:goto 


if ac$=-"[clr])” then scnclr :goto 
1350 

goto 1358 

graphic 2,8,21:char ‚8,21: input 


"Dreh Winkel”;dw$:dw=-val (dw$) 
input "ausmalen (Jja=1/nein=B)"”;as$: 
as"-val (as$):if as>1l or as<® then 
14708 


input ”Malfarbe 
£®=loeschen/1-malen)”;mf$:mf-val 
Cmf$):if mf>1 or mf<d then 14850 

graphic 1:box mf,g,f,xx,yy,dw,as 

goto 1350 

graphic 1:rem kreis 

:get key ac$ 

if ac$=-"[Lup)” then y=y-l:movspr 1,+ 

®,-1:goto 1528 

if ac$="[Cdown]” then y=y*+l:movspr 1, 

+®,+i:goto 1528 

if ac$=-"[left]” then x=x-l:movspr 1, 

-1,+d:goto 1528 

if ac$="[right]” then x=x+1:movspr 

1,+1,+8:goto 1528 

if ac$=chr$ (13) then g"x:f=y:movspr 

2e,g9+14,f+41:sprite 2,1,8,0,0,0,0: 

goto 1528 

if ac$="” ”" then rx=x-g:movspr 3,x+ 

14,y+41:sprite 3,1,8,0,0,2,8:goto 

1520 

if ac$=-";” then begin :rz=f-y 

graphic 2,8,21:char ‚B®,21 


input "Anfangs Winkel”;aw$:aw=val 
C(aw$) 

input ”End Winkel”;ew$S:ew-val (ew$) 
input ”Drehwinkel”;dw$:dw=val (dw$) 
input "Sekment Winkel” ;sw$:sw=val 
(sw$) 

input ”"Ausmalen (J/n)”; jJn$:if jn$= 


”j”" then mf=l:else mf-® 

graphic 1:circle ‚g,f,rx,rz,aw,ew, 
dw, sw 

if mf=-1 then paint 1,g,f 

bend 

if ac$="[Cclr)” then scnclr 

if ac$=-"e” then sprite 2,8:sprite 3, 
®:return 

if ac$=-"f” then gosub 95408 

goto 1528 

graphic 2,0,20 

char ‚B,28:input "Neue 
Hintergrundfarbe”;hf 

input "Neus Vordergrundfarbe”;vf 
input "Neues Rahmenfarbe”;rf 

input "Neue Sprite Farbe”;sf 


1290 
1544 


2344 
3505 


575 
s52 
550 
3187 


3075 
3012 
2956 
5336 
2484 
1538 
1252 
1977 


611 
4458 


5558 


6558 


EIeN 
611 
S52 
5508 

3155 


3043 
2988 
2324 
5364 


5132 


2042 
1678 
3081 


2636 
2457 
3449 


4651 
29336 


ISSN 

304 
1047 
2372 


1252 
595 
903 

3457 


2271 
2315 
2346 


ö VERWERTEN 


1788 
1798 
1800 
1819 
18228 
18398 
1840 
1858 
1860 
1870 
1889 
1898 
1902 
1918 
1920 


1939 
1940 
1958 
1960 


1978 
1980 


1992 
2000 
2010 
20208 
2039 
2040 


20508 
2060 
2070 


2080 
2030 
2100 
2110 
2120 
2130 
2140 
2159 
2160 
2170 
2180 
21390 
2200 


2210 
2220 


2230 
2240 


2250 
2260 


2278 
2289 
2230 
23008 


color ®,hf:color 1, hu eslor 4; re 

sprite 1; 1,sf,0,8,0 

return 

gräphic 1:rem invertieren 

fast :for i=® to 320 step 41 

for ii=-® to 2208 step 41 

sshape a$,i,ii,i+49,ii+4® 

gshape a$,i,ii,l 

next :next :slow 

return 

sprite 1,8:graphic ®:goto 429 

graphic 1:goto 988 

graphic l:rem ausmalen 

:get key ac$ 

4; ac$="[up]” then y=-y-1:movspr 1,+ 
‚-l:goto 1918 

1 ac$="Cdown]” then y=y+l:movspr 1, 

+B,+1:goto 1918 

if ac$=-"[left]"” then x=x-1:movspr 1, 

-1,+9:goto 1910 

if ac$="[right]” then x=x+1:movspr 

1,+1,+8:goto 1918 

if ac$="[Cclr]” then scnclr 

1918 

if ac$=chr$ (13) then begin 

graphic 2,0,23:char ‚8,24:print 

”malen/loeschen(1/8)”:get key mf: 

graphic 1:paint mf,x,y:bend :goto 

1918 

if ac$="e" then return 

if ac$-"f” then gosub 3549 

goto 1318 

graphic 1:rem text 

:get key ac$ 

if ac$="[up]” then y=y-1:movspr 1,+ 

®,-1:goto 2030 

if ac$=-"[down]” 

+9,+l:goto 2030 

if ac$=-"[left]” 

-1,+Bd:goto 2038 

if ac$="[right]” then x=x+l:movspr 

1,+1,+8:goto 2038 


if ac$=chr$ (13) then print chr$ 
(14):return 

if ac$=chr$ (20) then x=x-B:movspr 
1,-8B,+8:char ‚x/B,y/B,” ”:goto 2038 
if ac$=-"[clr]” then scnclr :else 
begin :char ‚x/B,y/B,chr$ (142)+ac$ 
if x<311 then x=x+8:movspr 1,+8B, +2: 
else bend 

goto 2038 

rem copieren 

:graphic 1 

fe=-1 

get key ac$ 

if ac$=-"[up)” then y=y-1:movspr 1,*+ 
®,-1:goto 2160 

if ac$=-"[down]” then y=y+l1:movspr 1, 
+Bd,+1:goto 2160 

if ac$="[left]” then x=x-1:movspr 1, 
-1,+8:goto 21608 

if ac$="[right]” then x=x+1:movspr 
1,+1,+8:goto 2168 

if ac$=-"e” then sprite 2,®:return 
if ac$=-chr$ (13) then rx=x:ry=y: 
movspr 2,rx*+14,ry+4l:sprite 2,1,8,2, 
0,0,8:goto 2168 

if ac$=-" ” then begin :xx=x:yy=y:i=i 
graphic 2,8,23:input ”feld”;fe:if fe 
<2 or fe>l1l then 2249 

graphic 1 

for t=-1 to bn(fe):yx$(Ct,fe)="":next 
t 

for f=ry to yy 

movspr 2,rx+14,f+41 

sshape yx$li,fe),rx,f,xx,f 

i-i+l 


:goto 


then y=y+1l:movspr 1, 


then x=x-1:movspr 1, 


SE TEE N DEN, 
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1373 
1642 
142 
Ss5e 
1425 
Ies2 
2333 
1267 
900 
142 
1275 
794 
552 
550 
3171 


3053 
29396 
2940 
1513 


1435 
7313 


7208 
IaSEe 
603 
Ssse 
558 
3135 
3023 
2960 


2904 


1703 
4458 
4039 
3698 

585 

443 

547 

sei 
3181 
3079 
3016 
23969 
1530 
geu2 
E4EB2 
4217 


3208 
2487 


117e 
1288 
2149 

345 


2310 
2320 


2330 


2340 
2350 
2368 
23708 
2388 


2399 
2400 
2410 


2420 
2430 


2440 
2450 


2460 


2470 
2480 
2490 
2509 
2510 


2520 
2538 
25408 


2550 
2560 
2570 


25808 
25908 
2608 
2619 
2620 
26308 
2640 
2650 
26608 
2678 


2680 
2699 


2700 
2718 
2720 
2730 


2740 
27508 
2760 


2770 
2788 


2792 
2800 


2810 
28208 
2830 


next :bend :bn(fe)=i 
if ac$=-";” then begin IXX-X:yy-y:dy= 
yyti:i=l 


graphic 2,0,23:input ”feld”;fe:if fe 
<2 or Fesil then 2338 
graphic 1:i=1 

For F=yy to dy 

gshape yx$Ci,fe),xx,f:i=-i+1 
next :bend 

if ac$=-"[clr]” then scncelr 
2,8 

if ac$="f"” then gosub 9549 
goto 21608 

char ‚8,20:print "1)Text 2)Copieren 
3)S5piegeln 4)Drehen[l2spaces]” 

print ”"5S)Spiegeln II 6)Spiegeln III 
7)Zurueck ” 

print "8)Spiegeln IV 9)Blaettern 
C1l4spaces]” 

print "[4®spaces)]":graphic 2,9,20 
get key c$:c=val (c$):if c=® then c= 
10 


:sprite 


on c gosub 2029,2139, 2490, 2659, 3040, 
3210,2480,3380, 3590 

goto 241® 

goto ‘1108 

graphic 1:rem spiegeln 

:get key ac$ 

if ac$="[Lup]” then y=y-1:movspr 1,*+ 


8,-1:goto 2509 
if ac$=-"[down]” 
+d,+l:goto 2598 
if ac$="[left]” 
-1,+Bd:goto 2508 
if ac$="[right]” then x=x+1:movspr 
1,+1,+9:goto 2500 

if ac$=-"f” then gosub 39549 

if ac$="e” then sprite 2,®:return 
if ac$=chr$ (13) then rx=x:ry=y: 
movspr 2,rx+l4,ry+41l:sprite 2,1,8,®, 
2,0,0 


then y=y+1:movspr 1, 


then x=x-1:movspr 1, 


if ac$=" ” then goto 2690 
goto 2508 

XX=X:Qyy=y 

for d=rx to xx:dx=xx-d 


sshape zz$,d,ry,d,yy:t=xx+dx 
gshape zz$,t,ry:next :goto 2508 
goto 25098 


graphic 1:rem drehen 

get key ac$ 

if ac$=-"1"” then Ih=1:play "a”:goto 
2728 

if ac$="2” then lh=2:play "a”:goto 
2720 

if ac$="3” then 1h=3:play "a”:goto 
2728 

if ac$=-"e” then return 

goto 2668 

get key ac$ 


if ac$="[Lup]” then y=y-1:movspr 1,+ 
®,-1:goto 2720 

if ac$="[down]” then y=y+1l:movspr 1, 
+8, +1:goto 2728 

if ac$="[left]” then x=x-1:movspr 1, 
-1,+9:goto 2728 

if ac$="[right]” then x=x+1l:movspr 
1,+1,+8:goto 27298 

if ac$=-"f” then gosub 9540 
if ac$=-"[clr]” then scncelr 
2720 

if ac$=-"e” then return 

if ac$=chr$ (13) then rx=x:ry=y: 
movspr 2,x+14,y+41l:sprite 2,1,8,0,0, 
8,8:goto 2728 

if ac$="” ” then 2830 

goto 2728 

XXX: yy=y:dx"xx-rx: dyryy-ry:ux-rx-1 


:goto 
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2848 if dx>dy then hl=1:else hl-® 1733 3468 if ac$=-chr$ (13) then rx=x:ry=y:: 6054 
2850 if hl=1 and l1h=1 then gosub 8398 1611 movspr 2,rx+14,ry+41l:sprite 2,1,8,0, 
2868 if hl=1 and Ih=2 then gosub B37® 1806 0,9,9:goto 3398 
8878 if hl=1 and 1h=3 then gosub 8538 1871 3478 if ac$=" ” then begin 967 
2888 if hl=-® and Ih=1 then gosub 81428 1595 3480 yy=y:xx-x:s-l 1495 
2898 if hl=-® and Ih=2 then gosub 2920 1566 3498 for f*=ry to yy 1172 
2908 if hl-®8 and 1Ih=-3 then gosub 8468 1768 35008 sshape xx$,rx,f,xx,Ff 1689 
2918 goto 26608 633 3510 s-s+1 365 
29328 graphic 1:rem 188/1 552 3528 gshape xx$,rx,ry-s 1433 
29330 Fast :dd=yy-ry 1442 3538 next :bend 697 
2948 do until ux=xx 839 3548 goto 3398 647 
2950 ux=ux+l:s5=-s+1 1321 3558 rem strichstaerke 
2960 For dry to yy 1168 3568 :za=-za+tl:if za>2 then za=l 1852 
2979 ss=ss+1 819 3578 width za 425 
2989 dy=-yy-d 333 3588 return 142 
2390 sshape zx$,ux,d,ux,d:draw ®,ux,d 2840 5 3599 graphic 2,0,20:char ‚®,28:print 5605 
3000 t=xx-s:tt=Clyy+dd)-ss)+1 2648 > ec 2)Spruehdose 1 
er 
Ss er uaerraeranne ahre SE 3500 print "4)Spruehdose II S)Pinsel 1 4415 
n r i inse = 

> che ee So | 3518 print "72Zurueck 8>Pinsel 111 3802 
3060 if ac$=-"Lup]” then y=-y-1:movspr 1,+ 3171 S)Blaettern[Sspaces] 

®,-1:goto 3050 3628 print ”[39spaces) 1508 


3078 if ac$="[down]” then y=y+l:movspr 1, 3059 3638 get key c$:c=-val (c$):if c<l or c>9 3276 
+d,+l:goto 39058 then 3638 

3080 if ac$="[left]"” then x=x-1:movspr 1, 2996 3640 on c gosub 3560,3660,4030,43190,5310, 4545 
-1,+d:goto 3058 ! 5599, 2410,5870,56108 


2 ea FRE; M N 3658 goto 3598 655 
uni u et Kanu ne RM 3668 graphic 1:rem spruehdose SG 
TEEN 3670 :get key ac$ 558 
3108 if ac$="f” then gosub 9540 1252 Es 5 ei 
3118 if ac$="e” then sprite 2,2:return 1530 8 26580 er a y-y-l1:movspr 1,+ 38251 
. "X:CUrV: 77 Al z 
> hei ee vn ) ar 3698 if ac$=-"[down]” then y=-y+i1:movspr 1, 3139 


+B,+l:goto 3678 


N en 3700 if ac$=-"Lleft]” then x=x-l:movspr 1, 3076 


3130 if ac$="” ” then begin 967 -1,+9:goto 3678 
3140 yy=y:xx=x 1044 75 3718 if ac$="[Cright]” then x=x+1:movspr 3028 
3158 For dry to yy 1168 1,+1,+8:goto 3678 
3168 dy=-yy-d 933 3728 if ac$="e” then return 728 
3178 sshape xz$,rx,d,xx,d:t=yy+dy E46B 3730 if ac$=-"f” then gosub 9549 1252 
3188 gshape xz$,rx,t+1 1218 3748 if ac$=chr$ (13) then 3769 1537 
3198 next :bend 697 3750 goto 3678 643 
3208 goato 3958 603 3768 get key acs$ sei 
3218 graphic 1:rem spiegeln iii Ss52 3778 if ac$="[Lup]” then begin 1859 
3228 :get key ac$ 558 3788 y=u-6:movspr 1,+0,-6 1636 
32380 if ac$="Lup]” then y=y-1:movspr 1,+ 3139 3798 gosub 3968 651 
8,-1:goto 3220 3808 bend :goto 3769 1058 
32490 if ac$="[down]” then y=-y+1:movspr 1, 3027 3818 if ac$="[down]” then begin 19027 
+0, +l:goto 3220 3829 y-y+56:movspr 1,+9,+6 1596 
3258 if ac$="[left]” then x=x-l:movspr 1, 2964 3838 gosub 3968 651 
-1,*+8:goto 3228 3848 bend :goto 3768 1058 
3260 if ac$="[right]” then x=x+1:movspr 2908 3858 if ac$=-"[Lleft]” then begin 1262 
1,+1,+08:goto 3220 3868 x-x-E:movspr 1,-6,+8 1522 
3278 if ac$="f” then gosub 9549 1252 3878 gosub 3960 651 
3288 if ac$="e” then sprite 2,d:return 1538 3888 bend :goto 3768 1058 
3298 if ac$=chr$ (13) then rx=x:ry=y: 6175 38930 if ac$="[right]” then begin 1830 
movspr 2,rx+l4,ry*+4l:sprite 2,1,8,2, 3908 x=x+6:movspr 1,+6,+® 1518 
8,20,0:goto 3220 3918 gosub 3969 651 
3308 if ac$="” ” then begin 967 3928 bend :goto 3769 1058 
3318 t=rx-2:yy=y:xx=x 1882 3938 if ac$="[clr]” then scnclr 1947 
3328 For derx to xx 968 3948 if ac$=chr$ (13) then 3670 1553 
3338 sshape xy$,d,ry,d,yuu 1403 3958 goto 3768 639 
3340 gshape xy$,t,ry 1010 3968 For i-1 to 15 803 
3358 t=t-1 378 3978 o=-int C rnd (1)*7)+1 1425 
3360 next :bend 6937 5 3988 oo=int C rnd (19*7)+1 1654 
3378 goto 3220 587 39398 x1=x-3:y1=-y-3 1579 
3388 graphic 1:rem spiegeln iv +) 4000 draw ‚xl+o,yi+oo > 1454 
3398 :get key ac$ 550 4018 next 138 
3400 if ac$="[Lup]” then y=y-1:movspr 1,+ 3259 4020 return 142 
®,-1:goto 3398 4838 graphic 2,8,22:rem raster 1068 
3410 if ac$-"Cdown]” then y=y+l:movspr 1, 3147 4040 :print "Raster malen oder loeschen 3414 
+8,+1:goto 3399 (m/1)” 
3420 if ac$="[left]” then x=x-1:movspr 1, 3084 4050 get key ou$:if ouSß="m” then 4070: 3078 
-1,+8:goto 3398 else 42008 
3438 if ac$="[right]” then x=x+1:movspr 3028 4060 return 3 142 
1,+1,+8:gota 3398 4078 i=l:re=-18:input "Rastereinteilung 4697 
3448 if ac$=-"e” then sprite 2,9:return 15308 C3right]1@[4left]”;re 


3459 if ac$="f” then gosub 9549 1252 4088 i=1:Ffor yp=® to 208 step re 1571 


4290 
41008 
4118 
4120 
4130 
4140 
4150 
4160 
4170 
4180 
4190 
4200 
4210 
4220 
4230 
4240 
4250 
42608 
4270 
42808 
4230 
4308 
4310 
4320 
43390 


4340 
4358 
4360 


4378 
4380 
4398 
4400 
4410 
4420 
4430 
4440 
4450 
4460 
4470 
4488 
4490 
4590 
4518 
4520 
4530 
4540 
45598 
4568 
4578 
4588 


45908 
4508 
4612 
4620 
4630 
4640 
4658 
4668 
4678 
46828 
46308 
4700 


4710 
4720 
4738 
4740 


4758 
4768 


sshape a2$(i),®,yp,320,yp+1 
i=-i+tl:next yp 

i=l:Ffor xp=® to 328 step re 
sshape al$(i),xp,®,xp+2,208 
wir} 

draw ‚xp,® to xp,20®8 
next 

for yp"=® to 208 step re 
draw ‚d,yp to 328,yp 
next 

goto 49608 

i=-l:for xp=-® to 328 step 
draw ®8,xp,® to xp,208 
gshape al$(i),xp,® 

4ri+r 

next 

i=1:for yp=® to 2088 step 
draw 8,28,yp to 328,yp 
gshape a2$(i),d,yp 

mil 

next 

goto 40628 

graphic 1:rem spruehdose ii 

:get key ac$ 

if ac$="[up]” then y=y-1:movspr 1,*+ 
8,-1:goto 4328 

if ac$="[down]” then y=y+1:movspr 1, 
+d,+l:goto 4320 

if ac$="[left]” then x=x-1:movspr 1, 
-1,+d:goto 4328 

if ac$="[right]” then x=x+1:movspr 
1,+1,+8:goto 4328 

if ac$-"f” then gosub 95498 

if ac$=chr$ (13) then 4418 

if ac$="e” then return 

goto 4329 

get key ac$ 

if ac$="[up]” then begin 
y=y-1®:movspr 1,+8,-1® 

gosub 4561® 

bend :goto 4410 

if ac$=-"[down)” then begin 
y-y+1®:movspr 1,+8,+10 

gosub 4618 

bend :goto 44198 

if ac$=-"[left]” then begin 
x=x-108:movspr 1,-108,+0 

gosub 461® 

bend :goto 4412 

if ac$="[right)]” then begin 
x=x+18:movspr 1,*+18,+® 

gosub 4618 

bend :goto 4418 


if ac$="[clr]” then scncelr :goto 
44190 

if ac$=chr$ (13) then 43208 

:goto 441® 


For.u=i 0:25 

o=int C rnd (1)*10)+1 

oo=-int ( rnd (1)*19)+1 
xiex- 5: yieu=-S 

draw ‚xli+o,yi+oo 

next 

return 

graphic 1:rem vergroessern 

:get key ac$ 

if ac$="[Lup]” then y=y-1:movspr 1,*+ 
®8,-1:goto 4699 

if ac$="[down]” then y=y+1:movspr 1, 
+8, +1:goto 45698 

if ac$="[left]” then x=x-1:movspr 1, 
-1,+8:goto 4698 

if ac$="[right]” then x=x+1:movspr 
1,+1,+9:goto 4699 

if ac$=-"e” then return 

if ac$="]” then gosub 5258 

if ac$=chr$ (13) then xx=x:yy=y: 
movspr 2,x+14,y+41:sprite 2,1,8,0,2, 


RETTEN Re 


2076 
738 
1559 
2187 
>13 
1329 
138 
1882 
1488 
138 
613 
1559 
1505 
1406 
315 
130 
1571 
1568 
12ER 
315 
138 
613 
s5s2 
sso 
3151 


3833 
29376 
2920 


1252 
1337 
720 
593 
sei 
1053 
1613 
601 
913 
1927 
1541 
601 
913 
1062 
1215 
601 
313 
1038 
1133 
601 
913 
1656 


1353 
471 
859 

1618 

1785 

1675 

1454 
138 
142 
s52 
558 

3287 


3175 
3ı12 
3056 

7208 


1182 
6117 


4770 
4780 
4799 
4802 


4810 
4820 
4839 
4840 
4859 
48698 
4870 
4888 
4830 
490908 
4310 
4920 
4930 


4949 
4950 
4960 
4370 
4980 
4938 
sooo 
5010 
5228 
5030 
5240 
5058 
So62 
5070 
5980 
5059 


519008 


5118 
51208 
5138 
5140 
5158 
5169 
5178 
5180 
5130 
5298 
s210 
S5e298 
s230 
s240 
52598 
5260 
5279 
5288 
5290 
5308 
5310 
5320 
53398 


53492 
5350 
5360 


5378 
5388 
5398 


54009 
5410 
Ss420 
5430 
5440 
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8,9:goto 4698 

if ac$=-"” ” then 4800 

if ac$-"f” then gosub 9549 

goto 4698 

fast :x2ex:y2ey:dy=y2-yy:dx=x2-xx:i= 
1 


sprite 2,8:sprite 1,8 

for z=-yy to y2 

sshape zb$(i),xx,z,x2,z 

j=j+1 

next z 

=] 

for rx=® to 328 step 41 

for ry=® to 288 step 41 

sshape ab$(i),rx,ry,rx+40d,ry+49® 
i=-i+l:next ry 

next rx 

graphic 1,1:i=-1:slow 

graphic 2,8,24:input "Vergrossserung 
[2right]5[3left]”;v 

graphic 1:d*9:dd=2: fast 

for z=1 to dy 

gshape zb$(z), 08,196 

for i=-® to dx 

sshape dz$,80+1,196,08+1,196 

for y"® to v 

for x=® to v 

gshape dz$, d+x+dd, O+d+y 

next x 

next y:dd=-dd+v+1 

next i 

d=d+1+v:dd=® 

if d>=195 then 5088 

next z:slow 
d=-®:dd-®:x=160:y=-188:locate 169,100 
sprite 1,1,8,0,0,8,8:movspr 1,x+t14,y 
+41 

get key ac$:if ac$-"s” then gosub 
5198 

scnelr :ie1 

fast :for rx=® to 328 step 41 

for ry=® to 208 step 41 

gshape ab$Ci),rx,ry 

i=j+1 

next ry 

next rx:slow 

return 

graphic 2,0,22 

char ‚®,22:print ”File-Name” 

input f$ 

fS-left$ (f$,12)+”,ver”:graphic 1 
bsave (f$),on b®,p8192 to p16192 
graphic 1:return 
graphic 2,0,22 
char ‚B,22:print 
input F$ 
fF$=-left$ (f$,12)+”,ver” 

bload (f$),on b9,p8192 

graphic 1:return 

graphic 1:rem pinsel i 

:get key ac$ 

if ac$=-"[up]” then y=y-1:movspr 1,*+ 
8,-1:goto 5328 

if ac$="[down]” then y=y+1:movspr 1, 
+2d,+1:goto 5328 

if ac$=-"[Cleft]” then x=x-1:movspr 1, 
-1,+0:goto 5328 

if ac$="[right]” then x=x+1:movspr 
1,+1,+0:goto 5328 

if ac$=-"e” then return 

if ac$="f” then gosub 9540 


"File-Name” 


if ac$="[clr]” then scnclr :goto 
5320 

if ac$=chr$ (13) then 5449 

if ac$=-" ” then fg=1 

if ac$="."” then fg=® 

goto 5328 


get key ac$ 


1078 
1252 

661 
4212 


1230 
1121 
1824 
315 
310 
378 
1395 
1334 
2608 
676 
331 
1624 
4032 


1784 
344 
1382 
838 
2664 
914 
sı2 
1614 
306 
1428 
276 
1088 
1470 
887 
3509 
2802 


2376 


553 
1775 
1334 
1395 

315 

395 
1835 

142 
1831 
2301 

417 
2362 
2445 

668 
1031 
2301 

417 
1865 
1558 

668 

552 

558 
3155 


3043 
29809 
2324 


720 
1252 
1704 


1441 
955 
19078 
535 
sei 


>» 
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5450 
54608 
5470 
5480 


5490 
5500 
5510 
5520 
5538 


5540 
5558 
5560 
55708 


5580 
5598 
5628 
5619 


56228 
5538 
5649 


5658 
5668 
5670 


5682 
5690 
5708 
5718 
5720 
5730 


5740 
5750 
5768 


5779 
5788 
57398 
121475} 
5818 
5828 
5838 
5849 
5850 
58608 
5870 
5888 
5838 


5900 
59310 
59320 
5938 
5940 
5350 
5960 


53708 
5989 


ELEI”) 
6990 
6010 


if ac$="[up)” then y=y-28:movspr 1,+ 
®,-208:goto 5512 

if ac$=-"[down]” then y=y+29:movspr 
1,+08,+28:goto 5518 

if ac$="[left]” then x=x-29:movspr 
1,-28,+8:goto 5518 

if ac$="[right]” then x=x+29:movspr 
1,+20,+9:goto 5518 

if ac$=chr$ (13) then 5329 

goto 5449 

if fg<>1 then begin 

ax=x-10:ay=y-10d: ex-ax+5:ey-ay+29 

box ‚ax,ay,ex,ey,,l:ax=x+5:box ‚ax, 
ay,ex,ey 

bend :goto 5440 

if Fg=-1 then begin 

ax=x-10: ay=-y-10: ex-ax+5:ey=-ay+29 

box ‚ax,ay,ex,ey, ,l:ax=x+5:ay=-y-1®: 
ex=axtS:ey=-ayt2ß:box ‚ax,ay,ex,ey,,1i 
bend :goto 5449 

graphic 1:rem pinsel ii 

:get key ac$ 

if ac$="[Lup]” then y=y-1:movspr 1,+ 
®,-1:goto 5608 

if ac$="[down]” then y=y+1l:movspr 1, 
+B,+1l:goto 5698 

if ac$="[left]” then x=x-1:movspr 1, 
-1,+8:goto 5608 

if ac$="[right]” then x=x+1:movspr 
1,+1,+9:goto 56988 

if ac$=-"e” then return 

if ac$=-"f” then gosub 39549 
if ac$="[clr]” then scnclr 
5608 

if ac$=chr$ (13) then 5728 


:goto 


if ac$=",” then g-1 
if ac$=" " then g=® 
goto 5692 


get key ac$ 

if ac$="[Lup]” then y=y-19:movspr N 
®,-10:goto 5790 

if ac$=-"[down]” then y=y+12:movspr 
1,+8,+18:goto 5790 

if ac$="[left]” then x=x-18:movspr 
1,-18,+8:goto 5798 

if ac$="[right]” then x=x+19:movspr 
1,+18,+8:goto 5798 

if ac$=chr$ (13) then 5608 

goto 5722 

if g<>1 then begin 

9gXx*x-5:gy”-y-5 

gshape dt$,gx, gu 

bend :goto 5728 

if g=1 then begin 

gxX"x-5:gy=y-5 

gshape td$,gx,gu 

bend :goto 5728 

graphic 1:rem pinsel iii 

:get key ac$ 

if ac$="[Lup]” then y=-y-1:movspr 1,+ 
®,-1:goto 5880 

if ac$="Cdown]” then yU=-y+tl:movspr 1, 
+8,+1:goto 5888 

if ac$="[left]” then x=x-l:movspr 1, 
-1,+8:goto 5888 

if ac$="[right]” then x=x+l:movspr 
1,+1,+9:goto 5888 

if ac$="e” then return 

if ac$="f” then gasub 39549 
if ac$="[clr]” then scnclr 
5880 

if ac$=chr$ (13) then 6019 
if ac$="d” then begin 


:goto 


graphic ®,1:input "Neue Einstellung” 
;h% 

char ‚8,24,"":graphic 1:bend 

goto 5B8B® 

get key ac$ 
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3351 
3175 
3354 
3298 


1361 
615 
sı4 

3452 

39386 


866 
923 
3458 
6612 


866 
s52 
558 
3147 


3035 
2972 
esıE 


7208 
1252 
1672 


1425 
12308 
1281 
531 
sei 
3384 


3208 
3356 
3292 


1345 
611 
190394 
1767 
1196 
1083 
971 
1767 
1164 
12889 
SEIS 
558 
32831 


3173 
3116 
3060 

720 
1252 
1483 
1283 

976 
3101 
1664 


663 
sei 


69028 
6038 
6049 
6058 


60608 
6079 
6080 


6099 
61098 


5110 
5120 
5130 
5140 
8150 


6169 
6170 
6189 
6198 


62009 
6218 
6220 


6239 
6249 
6250 


6260 
6270 


6289 
62938 
63008 


6319 
6320 


6330 
6349 
6350 
6360 
6370 
63898 
6399 
6492 
6410 
6420 
6430 
6449 
6459 
6469 
6470 
64898 
6439 
6590 
6510 
6520 
6530 


6540 
6550 
6569 


if ac$="[Lup]” then y=-y-h%:movspr 1,+ 

®,-h%:goto 69898 

if ac$="[down]” then y=y+h%:movspr 
1,+0,+h%:goto 6088 

if ac$="[left]” then ’x=x-h%:movspr 
1,-h%, +@:goto 6988 

if ac$="[right]” then x=x+h%:movspr 
1,+h%, +0:goto 6988 

if ac$=chr$ (13) then 5880 

goto 6919 
ax=x-h%/B:ay=-y-h%/2:ex=ax+h%:ey-ay+ 
h% 

box ‚ax,ay,ex,ey,,l:goto 6018 

char ‚8,20:print ”1)Vergroessern 
2)Koordinatensysthem[l4spaces]” 
print ”3)Parabeln malen “4)Quader 
S’Wuerfell4spaces)” 

print "E3Doppelt malenl2spaces] 
7)Zurueck[4spaces]” 

print "83Doppelt Malen II 9)Scrollen 
[1®spaces]":graphic 2,0,20 

get key 0$:c=val (c$):if c<l or c>9 
then 61408 

on c gosub 45680,6179,6420, 7740, 7540, 
7940,3598, 8700, 6868 

goto 61008 

graphic l:rem kosy 

:get key ac$ 

if ac$="[up]” then y=y-1:movspr 1,+ 
®,-1:goto 6180 

if ac$="[down]” then y=y+l:movspr 1, 
+Bd,+1l:goto 6188 

if ac$="[left]” then x=x-1l:movspr 1, 
-1,+8:goto 6188 

if ac$="[right]” then x=x+l:movspr 
1,+1,+d:goto 6188 

if ac$="e” then return 

if ac$="f” then gosub 9549 

if ac$="[clr]” then scnclr :goto 
61808 

if ac$=chr$ (13) then mMX-x:my-y: 
movspr 2,x+14,y+41:sprite 2,1,8,0,0, 
8,0:goto 6180 

if ac$=-"” "” then xx"X:yy=y:movspr 3,x 
+14,y+4l:sprite 3,1,8,0,0,0,9:goto 
6180 

if ac$=";” then 6308 

goto 6188 

xe=xX:yBey:dx=xx-mx: dy=my-y2:sx=mx- 
dx:sy-my+dy 

sprite 2,8:sprite 3,0 

draw ‚sx,yy to xx,yy:draw ‚mx,y2 to 
mMx,Ssy 

for i=sx to xx step 10 

draw ‚i,yy+1 

next i 

for i=y2 to sy step 18 

draw ‚mx-1,i 

next i 

char ‚xx/B,yy/B+1,”x” 

char ‚mx/8-1,4y2/8,”y” 

goto 6188 

graphic 1:rem parabeln malen 

:gosub 6188 

graphic 2,0,22 

char ‚B,22:input "A”;a 

input ”B”;b 

input, "C*,c 

graphic 1:i-1 

for xz=-5 to 5 step .i1 
yli)ma*tlxz*xz)+b*xz+tc:i=-i+l 

next xz:slow :x=mx-5Q:x2=x:y2=y(1) 
For i=-1 to 198 

g-sgn (yli)):on g+2 gosub 6730,6710, 
6580 

draw ‚x2,y2 to x,yu(i) 
x=x+l:y2ryli):ıxd=x 

next i 


3145 
2969 
3148 
3084 


1378 
577 
4126 


2209 
4782 


3317 
2823 
4336 
33393 
4684 


373 
s52 
558 
3239 


3187 
3064 
3008 


720 
1252 
1538 


5825 


5572 


1268 
637 
5331 


1232 
3258 


1437 
965 
276 

1705 
963 
276 

1866 

2307 
637 
58 
575 

1831 

1588 
488 
Sı6 
707 

1563 

2656 

33608 
762 

2917 


1545 
1788 
276 


DO  Orekeren. 
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6578 x=160:4=100:movspr 1,x+14,y+41: 4066 4 7230 for x-2 to 308 step 31 1315 
locate 160,108:return 73008 For y-® to 208 step 41 1287 
6588 if yCi)>1® then 6658 1514 7310 sshape zb$,x+20,y,x+51,y+42 2187 
6599 yCli)=yCi)*19 334 7328 gshape zb$,x,y 837 
6608 e-yCi) 521 7338 next y 308 
6610 d-100-yCi) { 875 7348 next x 306 
6629 yli)-yli)+d 682 7358 For 4-8 to 2028 step 41 1287 
6630 yCi)=-yCi)+te 686 7368 gshape zb$(i),299,y:i=i+1 1950 
6640 return 142 7378 next y:slow 885 
6659 yli)=yCi)*30 ıa22 © 7388 gato 6870 657 
6668 e-yCi) 521 73938 rem rechts 
6670 d-yCi)-100 1050 © 7400 fast :i=-l:Ffor y=-® to 200 step 41 1883 
66898 yCli)=yli)-d 684 7410 sshape zb$(i),300,4,319,y+498 2195 
6699 yCi)=yli)+e 686 74298 i=i+1 315 
6708 return 142 7438 next y:i=1 635 
6718 yCid-my 577 7440 for x"318 to ® step -31 2347 
6728 return 142 7450 For y=B to 208 step 41 1287 
| 6738 if yCi)<-18 then 6808 1746 7460 sshape zb$,O+x,y,0+30+x,y+42 2195 
6740 yli)=-yCi)*-19 983 7478 gshape zb$, O+x+20,y 1571 
6750 e=yCi) s21 7488 next y 308 
| 67608 d-=-108-yCi) 875 7498 next x 306 
6778 yCi)=-yCi)+d 682 7508 for y-® to 200 step 41 1287 
6788 yCi)=-yli)+e 686 7518 gshape zb$(i),®,y:i-i+1 1612 
6798 return 142 7528 next y:slow » B85 
6808 yCi)=-yCi)*-10 983 7538 goto 6878 657 
6818 e-y(i) s2e1 7548 graphic 1:rem wuerfel s52 
6820 d=yCi)-1020 1050 & 7550 :get key ac$ 550 
6838 yCid-yCi)-d 684 7560 if ac$=-"[Cup]” then y-y-l:movspr 1,+ 3227 
6849 yCi)=-ylid+e 686 8,-1:goto 7558 
6850 return 142 7570 if ac$="Cdown]” then y=y+1:movspr 1, 3115 
68608 graphic 1:rem scrollen s52 +d,+1l:goto 75598 
6878 :color 4,1:get key ac$ 1359 75880 if ac$="[left]” then x=x-1:movspr 1, 39852 
6888 if ac$="[Lup]” then color 4,8:goto 1994 -1,+0:goto 7558 
6950 7598 if ac$="[right]” then x=x+1:movspr 2996 
68988 if ac$="Cdown]” then color 4,B:goto 1982 1,+1,+0:goto 7559 
7100 7608 if ac$=chr$ (13) then xi=x:yl=y: 5938 
6908 if ac$="[Lleft]” then color 4,8:goto 2228 movspr 2,x+14,y*4l:sprite 2,1,8,0,0, 
7258 0,8:goto 7558 
6918 if ac$="[Lright]” then color 4,8:goto 1988 7618 if ac$="f” then gosub 39540 1252 
7490 7628 if ac$="[clr]” then scncelr :goto 1737 
69208 if ac$="e” then x=160:y-100:movspr 4285 7550 
1,x+14,y+4l:return 7638 if ac$=" ” then goto 7660 1139 
6939 goto 6870 657 76408 if ac$="e” then sprite 2,08:return 1538 
6948 rem oben 76508 goto 7550 631 
693508 Fast :i=1:for x=® to 328 step 41 1962 7669 x2=x:dx=x2-x1:yP=yl+dx 2467 
6968 sshape zb$(i),x,0,x+40,20 1773 7678 box ‚x1,yl,x2,yu2 1483 
6970 i=-i+1 315 7688 x3=-x1+Cdx/2):y3=y1-(dx/2) 2363 
6980 next x 306 7699 x4=x2+(dx/2):y4=y2-(dx/2) 2192 
63308 for y-® to 188 step 31 1255 7708 box ‚x3,43,x4,4u4 1663 
78008 For x=® to 320 step 41 1445 7718 draw ‚x2,yl to x4,4y3:draw ‚xi1,yl to 3121 
7010 sshape zb$,x,20+y,x+49, 21+4+39 2164 x3,43 
7028 gshape zb$,x,0+y 10837 7720 draw ‚xl,y2 to x3,y4:draw ‚x2,y2 to 3086 
7038 next x 386 x4,u4 
7048 next y:i=1 695 7738 goto 7558 631 
7058 For x=® to 328 step 41 1445 7748 graphic 1:rem quader 552 
7068 gshape zb$(i),x,179:i=-i+1 2016 7758 :get key ac$ 558 
7078 next x:slow :goto 6869 1435 7768 if ac$=-"[Lup]” then y=y-1:movspr 1,+ 3243 
78088 graphic 1 328 ®,-1:goto 7750 
79098 rem unten 7778 if ac$="[down])” then y=-y+1:movspr 1, 3131 
71008 :i=1:Ffor x=® to 328 step 41 1556 +8,+1:goto 7758 
7118 sshape zb$(i),x,179,x+40,139 23088 7788 if ac$="[left]” then x=x-1:movspr 1, 3068 
7128 i-i+1 315 -1,+8:goto 7758 
7138 next x 306 7730 if ac$="[right1” then x=x+1:movspr 3012 
7148 for y-155 to 8 step -31 1557 1,+1,+98:goto 7758 
7158 for x=® to 328 step 41 1445 7808 if ac$="f” then gosub 9549 1252 
7168 sshape zb$,x,0+y,x+49,0+y+39 2122 7818 if ac$=chr$ (13) then x1=x:yl=y: 6002 
7178 gshape zb$,x,O+y+21 ey pt movspr 2,x+l14,y+4l:sprite 2,1,8,0,2, 
7180 next x 306 ®8,8:goto 7758 
7198 next y 328 7828 if ac$-"e” then sprite 2,08:return 153® 
7200 i-1 378 7838 if ac$="[clr]” then scnclr :goto 1881 
7218 for x=-® to 328 step 41 1445 7758 
7228 gshape zb$(i),x,8:i-i+1 1743 7840 if ac$="” ” then 7868 1132 
7238 next x:slow :goto 6878 1437 7858 goto 7758 633 
7248 rem links 78608 x2=x:y2=y:dy=yP-y1:dx=x2-x1 3144 
7250 fast :i=1:Ffor y-® to 208 step 41 1883 7878 box ‚x1,y1,x2,y2 1483 
7268 sshape zb$(i),0,4,19,y+49 1758 78880 x3=x1+(dx/2):y3=y1-Cdy/2) 2395 
7270 i=-i+1 315 78938 x4=x2+(dx/2):y4=y2-tdy/2) 2224 
7288 next y:i=1 695 7908 box ‚x3,4y3,x4,y4 1663 
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EEE TEE N u SE 


79310 
7320 
7338 
7948 
7350 


7960 
7978 


79808 
7990 
80008 
8010 
8020 
8039 
8040 
8959 


8060 
8070 


draw ‚x1,yl to x3,y3:draw ‚x2,y2 to 
x4,y4 

draw ‚x1,y2 to x3,y4:draw ‚x2,yl to 
x4,43 

goto 7750 

graphic l:rem doppelt malen 


:locate 160,50:x=-160:y-50:xa-16Q:ya 
158:movspr 1,x+14,y+41 

get key ac$ 

if ac$="[Lup]” then y=y-1:ya=yatl: 
movspr 1,+8,-1:goto 7968 

if ac$=-"[down)” then y=-y+l:ya=ya-l: 
movspr 1,+0,+1:goto 7968 

if ac$="[left]” then x=x-1:xa=xa-l: 
movspr 1,-1,+0:goto 7968 

if ac$="[right]” then x=-x+1:xa=xa+l: 
movspr 1,+1,+9:goto 7968 

if ac$="[Cclr]” then scnclr :goto 
7960 

if ac$="e" then return 

if ac$=chr$ (13) then 80868 

if ac$="f” then gosub 8978 

goto 79698 

get key ac$ 

if ac$=-"[up]” then y=y-1:ya=ya+l: 
draw ‚x,y,xa,ya:movspr 1,+0,-1:goto 
8068 

if ac$="[down]” then y=y+i:ya=ya-i1: 
draw ‚x,4,xa,ya:movspr 1,+8,+1:goto 
8068 

if ac$="[left]” then x=x-1:xa=xa-l: 
draw ‚x,y,xa,ya:movspr 1,-1,+8:goto 
8060 

if ac$="[right]” then x"=x+1:xa=xatl: 
draw ‚x,4,xa,ya:movspr 1,+1,+d:goto 
80860 

if ac$=chr$ (13) then 7968 

if ac$="[clr]” then scnclr :goto 
8068 

goto 88608 

graphic 1:rem 99/1 

gosub 8279 

Fast :do until ux=xx 

ux=ux+i 

For dry to yy 

sshape zb$,ux,d,ux,d:draw ®,ux,d 
gshape zb$, (xx+dy+tl)-ss yy-s:ss=ss+1 
next d:ss"®:s=-s+l:loop :s=®:ss=9:zb$ 
="":hz=d 

for i-® to dx 

sshape yl18,xx, (yy-dx)+i,xx+dy, (yy- 
dx)*+i 

gshape y1$,rx, (yyu-dx>+i 

gshape al$li),xx+Cdy-dx), (yy-dx)+i-1 
next i:slow :return 

fast :Ffor i=-1 to dx*+l:rem speicher 9 
0/1 

sshape al$(i),xx+ldy-dx), (yy-dx)+li- 
1),xx*+dy, (yy-dx)+Ci-1) 

next i:slow :return 

fast :graphic 1:rem 90/2 

do until ux=xx 

ux=ux+l:s=s+1 

for dry to yy 

sshape zb$,ux,d,ux,d:draw ®,ux,d 
gshape zb$,rx+tss yy+ts:ss=-ss+1 

next d:ss=8:loop :s=®:ss=B:slow : 
return 

graphic 1:rem 180/2 

Fast :do until ux=xx 

ux=ux+tl:s=-s+t1 

for d-ry to yy 

sshape zb$,ux,d,ux,d:draw Q,ux,d 
gshape zb$, (rx-1)-s, yy-ss 

ss=-ss+l 

next d:ss=B:loop :s=-®:ss=®:slow 
return 

fast :graphic 1:rem 270/1 

do until ux=xx 

s=-s+l:ux=ux+1:5s=® 

for d-ry to yy 


3006 


3066 


633 
ss2 
Ss620 


so1 
4074 


3978 
3783 
3711 
1674 


720 
1465 
1328 

655 

so1 
5379 


5343 


5373 


sı8ı 


1601 
1657 


621 
Sa 
641 
1407 
927 
1168 
2752 
3365 
3435 


838 
3123 


1669 
3240 
1087 
1678 


5305 


1087 
896 
833 

1321 

1168 

U 

2745 

2958 


s52 
1407 
1321 
1168 
2752 
2224 
819 
2716 
142 
896 
839 
18408 
1168 


8500 


' 8518 


8522 
8539 
8540 
8550 
8560 
8570 
8588 
8599 
86089 
8619 
8620 
8630 
8640 
8650 
86560 


8679 
8680 
8690 
8790 
8710 


87209 
8730 


8740 
8750 
8760 


8779 
8780 


8799 
8800 
8819 


B8B20 
8830 


8840 


8850 


8879 
8880 
88908 
8909 
8919 
8922 
8330 
8349 
8959 
8360 
8970 
8980 
8330 
9922 
9010 


9020 
9930 


sshape zb$,ux,d,ux,d:draw ®,ux,d 
gshape zb$, (rx-dy)+ss , yy-s:ss=ss+1 
next d:loop :s=®:slow :return 
graphic 1:gosub 8660:rem 270/2 
fast :do until ux=xx 

ux=ux+1:s=s+1 

for d=ry to yy 

sshape zb$,ux,d,ux,d:draw ®,ux,d 
gshape zb$, (rx+dy)-ss,ry-s:ss=ss#+1 
next d:ss=®: loop :ss=®:s=® 

for d=1 to dx+1 

sshape. zb$, rx+s,ry,rx+s, ry-dx 
gshape zb$,rx+s,ry-(Cdx-dy) 

gshape al$(d),rx+s,ry-dx-1 

s=-s+l 

next d:s"®:slow :return 

fast :for i=-1 to dx+l:rem speicher?7 
0/2 


:sshape al$(i),rx+ts,ry-dx,rx+s,ry- 
(dx-dy) 

s=s+1 

next :s=d:slow :return 


graphic 1:rem doppelt malen ii 
x-B0:y=-1989:xa=249:ya=108:movspr 1,x+ 
14 ,y*41:locate x,y 

get key ac$ 

if-ac$=-"[up]” then y=-y-l:ya=ya-l: 
movspr 1,+8,-1:goto 8728 

if ac$=-"[down]” then y=y+l:ya=ya+l: 
movspr 1,+8,+1:goto 8728 

if ac$=-"[left]” then x=x-l:xa=xa+i: 
movspr 1,-1,+8:goto 8728 

if ac$="[right]” then x=x+1:xa=xa-l: 
movspr 1,+1,+8:goto 8728 

if ac$="e” then return 

if ac$="[Cclr])” then scnclr :goto 
8720 

if ac$=chr$ (13) then 8829 

if ac$=-"f” then gosub 8900 

goto 87208 

get key ac$ 

if ac$="[Lup]” then y=-y-1:yarya-ı: 
draw ‚x,y,xa,ya:movspr 1,+9,-1:goto 
8820 

if ac$=-"Cdown]” then y=y+1:ya=ya+l: 
draw ‚x,4,xa,ya:movspr 1,+8,+1:goto 
88208 

if ac$="[Cleft]” then x=x-1:xa=xarl: 
draw ‚x,4,xa,ya:movspr 1,-1,+8:goto 
8820 

if ac$=-"[right]” then x=x+1:xa=xa-l: 
draw ‚x,4,xa,ya:movspr 1,+1,+8:goto 
8820 

if ac$="[Chome]” then scnclr :goto 
8820 

if ac$=chr$ (13) then 8728 

goto 8828 

color 4,8:get key ac$:rem fast doppe 
ltii 

if ac$="[Lup]” then y=y-19:ya=ya-10: 
movspr 1,+8,-108:goto 8998 

if ac$=-"[down]” then y=y+19:ya=ya+ 
18:movspr 1,+8,+10:goto 89908 

if ac$=-"[left]” then x=x-19:xa-xa+t 
18:movspr 1,-10,+08:goto 8908 

if ac$="[right]” then x=x+109:xa=-xa- 
18:movspr 1,+1®8,+®:goto 8900 

if ac$="s” then color 4,1:return 
goto 8908 

color 4,8:get key ac$:rem fast doppe 
lti 

if ac$="[up]” then y=-y-19:ya=ya+1B: 
movspr 1,+8,-18:goto 8978 

if ac$=-"[down]” then y=y+19d:ya=-ya- 
18:movspr 1,+8,+10:goto 8978 

if ac$=-"[left]” then x=x-10:xa=xa- 
18:movspr 1,-18,+®:goto 8978 

if ac$="[right]” then x=x+1B:xa=xa+ 
18:movspr 1,+18,+0:goto 8970 

if ac$=-"s” then color 4,1:return 
goto 8978 


8752 
3552 
1978 
1212 
1497 
1321 
1168 
2752 
3568 
2249 

978 
2436 
2003 
2652 

365 
1182 
1678 


3793 
365 
843 
ss2 

4270 


sol 
4014 


3B86 
3651 
3651 


720 
1888 


1465 
1216 
617 


sei 
5335 


5327 


5357 


5197 


1625 
1449 

621 
1576 
4181 
4108 
4031 
4043 
1587 

609 
1576 
4288 
4263 
4254 
4142 


1587 
665 


9049 
9950 
9068 


93079 
9080 
9930 


91008 
9118 
91228 
9138 
3140 
9158 
3160 
9179 
9189 
9198 


9200 
932198 


3220 
932320 
9240 
9250 
9269 
9279 


9289 
9290 


3308 
9319 


33208 
9330 
9340 
3350 
3360 
9379 
9380 


93398 
3420 


9410 
9428 
9430 
94409 
9450 
94608 
9470 
9480 
9490 


9500 
9510 
9529 
35398 
9549 
9558 
9560 
3578 
3580 
9590 
936989 


3610 
9629 


graphic 1:rem dauermalen 

get key ac$ 

if ac$=-"[up]” then y=y-1:draw ‚x,y: 
movspr 1,+8,-1:goto 9850 

if ac$="[down]” then y=y+1:draw ‚x, 
y:movspr 1,+8,+1:goto 9052 

if ac$=-"[left]” then x=x-1:drau ‚x, 
y:movspr 1,-1,+8:goto 9058 

if ac$="[right]” then x=x+1:draw ‚x, 
Y:movspr 1,+1,+8:goto 9058 

if ac$=chr$ (13) then goto 980 

if ac$="[clr]” then scnelr 

goto 9050 

scnelr 

char ‚,13,0,k1$ 

char ‚17,1, ”"Formatieren” 

print :input ”[3right]Name”;na$ 
char ‚13,8, "Bitte warten”,1 

header (na$),d®,ikl,u8 

if ds<>8 then begin :char ‚10,12, 
ds$,1 


char ‚12,13, "Nochmal (J/N)?”:get key 
aas 
if aa$=-"j"” then 9130:else bend : 


return 


char ‚14,13,"Fertig”,1:sleep 1 
return 

senclr 

char ‚13,2,k1$ 

char ‚17,1, "Directory” 

print :print "Disk Fertig?”:get key 
h$ 

catalog 

if ds<>8 then begin :char ‚10,12, 
ds$,1 

char ‚18,13, "Nochmal (J/N)?”:get key 


aa$s 

if aa$=-"j" then 9240:else bend : 
return 

get key 1$:return 


scnelr 
char ‚,13,0,k1$ 
char ‚17,1, ”"Scratchen” 


print :input "File Name”; f$ 
scratch (f$),d®,u8 

if ds<>8 then begin :char 
ds$,1 

char ‚180,13, "Nochmal (J/N)”:get key 
aas 

if aa$=-"j" then 9330:else bend : 
return 

char ‚14,13, "Fertig”,1:sleep 1 
return 

scnclr 

char ‚13,0,k1$ 

char ‚17,1, ”Rename” 

print :input "Alter Name”;an$ 

print :input ”Neuer Name”; nn$ 
rename (an$) to (nn$) 

if ds<>® then begin :char ‚12,12, 
ds$,1 

char ‚10,13, "Nochmal(jJ/n)”:get key 
aas 

if aa$-"j" then 9430:else bend : 
return 

char ‚14,13, "Fertig”,1:sleep 1 
return 

color. 4,B:get key ac$ 

if ac$="[up]” then y=y-18:movspr 1,*+ 
8,-18:goto 9540 

if ac$="[down]” then y=y+19:movspr 
1,+8,+18:goto 9548 

if ac$="[left]” then x=x-18:movspr 
1,-10,+98:goto 95498 

if ac$="[right]” then x=x+19:movspr 
1,+18,+9:goto 9548 

if ac$="s” then color 4,1:return 
goto 9542 


De, 


rem aus urheberrechtlichen gruenden 
kann die hardcopy-routiene nicht mit 


Endlich geschaftt: Picasso kann anfangen zu malen. 
PERFDVRERNE- CONFERENCE 


s52 
5®1 
4633 


4575 
4590 
4540 


1301 
1047 

615 

232 
1185 
2184 
1589 
e562 
ı@41 
2eBH2 


3883 
1728 


2649 
342 
232 

1185 

2003 

2454 


278 
2942 


3083 
1740 


858 

nIe 
1185 
1880 
1367 
1138 
2042 


2331 
1736 


2640 
142 
236 

1185 

1884 

1909 

Beas 

1059 

2o42 


3263 
1740 
2640 

142 
1344 
3319 
3143 
3231 
3227 


1587 
627 


9639 
3649 


6128 LIOTING 


rem abgedruckt werden 


3650 : 
9660 : 
9670 : 
93680 : 
9690 : 
97208 : 
9718 : 


9720 
9739 
93740 
9750 
9760 


rem hier ist platz fuer die hard- 
:rem copy-routiene 


9778 : 
9788 : 
9798 : 
98020 : 
9810 : 


98208 
9830 


3840 


3850 


9868 


93870 


98808 


3839 
9328 


99318 
9920 
9330 
93949 
9958 
9960 
33708 
9980 
9399 
10008 
10019 
109208 
10038 
10040 
10050 
10060 
10078 
10080 
10039 


:return 

J$="":char ‚8,28:print ”"[rvs]string 
too long! ![Loff]J”:graphic 2,0,23:get 
key Ft$:graphic 1:goto 2148 

slow :if er-14 then graphic ®,1:char 
‚B,12,"negat iv elöspaces!ik oo 
rdainate !!1",1:get key nj$s; 
char ‚B,24,”":graphic l:resume next 
if er-4 then graphic ®,1:char ‚10, 
e3,err$ (er),l:get key a$:resume 
next 

if er=23 then graphic 2,1:char ,‚®, 
12," st ri n gl2spacesit oo 
[2spaces]Jl o ng !!!![l6spaces]”,1: 
get key i$:char ‚B,24,”":graphic 1: 
resume next 

graphic ®,1:char 1,13,14,err$ (er), 
1:print :print :input 

"Aussteigen( J/n)[3right]JL3left]”; 
Jns 

if Jn$="j" then help :end :else trap 
9848:goto 429 

end 

data [2spaces)®, ®, ®, 8, 8, 8, 2, 
8, 0,0 

data [2spaces]®, ®, 2, 8, 32, 0, o, 
32,08, 0 

data ([2spacesJ32, ®, 8, 32, 8, 8, ®, 
0,172.243 

data [2spaces]®, 2, ®, ®, 8, 32, ©, 
0,,.38,.0 

data [2spaces]®d, 32, 8, 8, 32, 8, ®, 
8,0,0 

data [2spaces]®, 8, ®, 8, 2, 8, 0, 
®, ’ 

data [2spacses]®, ®, 2, 8, 8, 8, ®, 
0, 8, 08 

data [2spacesJ®, ®, 2, 2, 8, 2, ®, 
28, 0,0 

data (2spaces)3, 2, 2, 1, 
132, 8, 8 

data [2spaces]S6, ®, ®, 56, 2, ®, 
S6, d, 8, 56 


128, 0, ®, 


data [2spaces)]®, 8, Bd, 8, 2, ®, 2, 
0,0,0 
data [2spaces)®, 2, 8, 8, 2, 8, 0, 
®, 8, 
data [2spaces]®, 8, 28, 8, 2, 8, 2, 
80, 2,0 
data [2spaces]®, ®, 8, 2, 2, 2, 2, 
0, 0,02 
data [2spacss)®, 2, ®, 8, 3, ®, 2, 
Se I = RER | 
data [2spaces)J®, 192, 8, ®, 36, 2, 
Bd, 56, 8, © 


data [2spaces]56, ®, ®, 56, 8, 2, 0, 
8, 2, 0 

data [2spaces]®, 2, 8, 8, 2, 8, 0, 
0, 0,2 

data [2spaces]®, 8, 8, 8, 2, 08, 2, 
80, 80,0 

data [2spaces]®, 2, 8, 2 


87 
6195 


7841 


3587 


7508 


6365 


3028 


128 
1892 


2036 
22908 
2123 
2123 
1832 
1892 
1833 
eu2l 


2230 


1892 
1892 
1892 
1892 
2332 
2335 
2066 
1892 
1892 

767 
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G[ HARDWARE 


BAoIL PROGRAMM 
UND MAOGHINENGODE ZUM 
RUN-EPROMMER 


Hier ist die Software zu der 
Bauanleitung des RUN- 


für die Floppysteuerung und für das 
Brennen des Eproms enthalten. Dieses 
Listing muß mit dem Checker eingege- 


ie Ansteuerung des 
Epromers besteht aus 
zwei Teilen: Listing 1 — 


das Basicprogramm — 
beinhaltet die Menüsteuerung. Um 
den Speicherplatz für die Daten des 
Eproms bereitzustellen, ist das Basic- 
ende auf $2000 verschoben worden. 
Listing 2 — ein Hexdump-Listing — 
besteht aus den Daten für den Maschi- 


Eprommers für den 664 auf Seite 
106. Dort finden sich auch einige 
wichtige Hinweise zur 
Benutzung dieser Programme. 


(Listing 1) nachgeladen wird. In die- 


ben werden. Als Startadresse ist C000 
anzugeben. Sind alle Daten korrekt 
eingegeben, so muß das fertige Pro- 
gramm unter dem Namen „EPROM- 
MER.OBJ“ abgespeichert werden, da 
andernfalls das Basicprogramm dieses 
File auf der Diskette nicht findet. 


nencode, der vom Hauptprogramm sem Programmteil sind alle Routinen (T. Borris/T. Meidinger) JO 
System: Floppy/RUN-Eprommer 1000, 3000, 5000, 7000,2000,4000,6000, 
. 8000 
Art: Steuerungssoftware 128 goto 20 yes 
Sprache: Basic/ Assembler 1000 rem Fi 
Programmname: Eprommer-Soft - 1001 print "Cclr,3down]) fi - 2732a” 1458 
ER BEE BA EEE EEE ri RER 18982 print "Cdown] f2 - 2764 12.5v” 1577 
1003 print ”"[down] £3 - 2764 21V” 1696 
- 1804 print "[Cdown] f4 - 27128 12.,5v” 1939 
- 1085 print "Cdown] f5S - 27128 21v” 1635 
® if peak (56)-32 then poke S6,32:poke 4363 7 1086 print "Ldown) F& - 27256 12.50” 2250 
55,8:clr :load ”eprommer .obj”,8,1 1807 print ”[down] £7 - 27256 21v” 1946 
1 gn"8:rem geraetenummer 785 1808 print ”Cdown] FB - hauptmenue” 1588 
18 pa=56832: pb=pa+1:pc=pb+1:co=pc+1 3271 - 1005 poke 198,2:wait 198,1:get a$:poke 2495 
15 sp=53246:0k=53247:ph=53244:pl=53245: 7546 198,0 
bz=53243: et$="nicht selectiert”:vo=® “ 1018 if a$<”[L£1]” or a$>"[L£fB8]” then 1009 2381 
16 poke sp, 192:c0-53238:c1-53237:qh= 3516 7 1811 on asc (a$)-asc C"LE1I”)+1 goto 5928 
53229 “ 1100,1400,1600,1200,1300,15090,1708, 
17 c2-53236: ah-53235:al-53234:eh=-53233: 68755 © 1800 
el-53232:da-53231: rd=-53230 "1012 goto 1900 559 
18 poke da,1i 408 1108 rem 
28 print ”"[Cclr]”:poke 53280,0:poke 3508 , 1101 poke sp,8:poke ph,il:poke pl,19:poke 6255 
53281,8:poke 646,13 , bz,15:8t$="2732a”:vo=21:poke c®,®: 
38 print tab(14)"run-eprommer” 2328 & poke c1,2 
48 print tab(13)”L1i4cbm t]” 2687 ‚1182 poke c2,4:poke da,12:poke rd,® 2188 
S® print ”"[2down,7spaces])fl - epromtyp 2901 1103 return 142 
Festlegen” 1208 rem 
S5 print ”Cdown, 7spaces]f2 - EIES 1201 poke sp, 32: vo=21:et$="27256”:poke 5459 
programmierimpuls” c®,1:poke c1,3:poke c2,5:poke da,1 
60 print ”[Cdown, 7spaces]Jf3 - 2559 7 1202 poke ph,i1:poke pl,1®:poke bz,127: 3047 
diskettenoperationen” poke rd,® 
65 print ”Cdown, 7spacesJf4 - eprom 2908 ' 1203 return 142 
verifizieren” 1308 rem 
78 print ”Cdown,7spaces]f5 - leertest” 1493 1301 poke sp, 96: vo=12 .5:et$="2764”:poke 5687 
75 print ”Cdown, 7spaces]f&6 - eprom 2231 c®,1:poke c1,2:poke c2,4:poke bz,31 
auslesen” 1302 poke ph,11:poke pl,18:poke da,1:poke 2566 
80 print ”Cdown, 7spaces]Jf7 - eprom 2783 5 rd,1ı 
programmieren” - 1303 return 142 
85 print ”Cdown, 7spaces]f8 - ende” 1223 1408 rem 
87 print ”"C2downlepromtyp : "et$:print 3863 1401 poke sp,32:vo=21:et$="2764”:poke cd, 5622 
"spannung :"vo”v” 1:poke c1,2:poke c2,“4t:poke bz,31 
98 poke 198,08:wait 198,1:get a$:poke 2495 1402 poke ph,11:poke pl,1®8:poke da,S5:poke 2582 
198,08 rd,1 
108 if a$<”C£f1]” or a$>”"[C£f8]” then 30 2061 1483 return 142 
118 on asc (a$)-asc (”L£f1J”)+1 gosub 480B 1582 rem 


1591 


1502 


1503 
1600 
1601 


1602 


1603 
17008 
1701 


1792 


1703 
1890 
1999 
2000 


2018 


2015 
20228 
2999 
3000 
39001 


30083 
3005 


3007 
3008 
3003 


3010 
3011 


3012 
3198 
3101 


31902 
3103 


3111 
3399 
3301 


3302 
3303 


3311 
3590 
3501 
3502 
3503 
3594 


3505 
3506 


3507 
3508 
3509 


3518 
3511 


3512 
3513 


3514 


poke sp, 96: vo-=12,5:et$="27128”:poke 
c®d,1:poke c1,2:poke c2,5:poke bz,63 
poke ph,11:poke pl,1®:poke da,1:poke 
29,1 

return 

rem 

poke sp, 32: vo=21:et$="27128”:poke 
cd,1:poke c1,2:poke c2,5:poke bz,63 
poke ph,i11l:poke pl,18:poke da,1:poke 
rd,1i1 

return 

rem 

poke sp, 96: vo-12 ,5:et$="27256”:poke 
cd,1:poke c1,3:poke c2,5:poke bz,127 
poke ph,11:poke pl,1®8:poke da,i1:poke 
rd,® 

return 

rem 

return 

rem f2 


print "[clrIJprogrammierimpuls in 
msec[2spaces]” peek (da)”[4left)]”: 
print ”"[up]” tab(26): input w 


if wS5® or w<1 then 29018 

poke da,w 

return 

rem f3 

print ”[clr,2down] fi - programm 
laden” 

print ”C[Cdown] £f3 - programm 
speichern” 

print ”"C[down] f5 - disk-befehl 
senden” 

print ”"Cdown] £7 - directory” 


print ”Cdown] f8 - hauptmenue” 

poke 198,8:wait 198,1:get a$:poke 
198,8 

if a$<”C£f1]” or a$>”C£fBJI” then 3009 
on asc (a$)-asc C"[f1J”)+1 goto 
3100, 3300, 3500,3700, 3009, 3009, 3009, 
3890 


goto 3008 
rem 
print ”"C2downJ”:input ”programmname 


” ; pn$ 

print ”"Cdownlloading From ”;:sys 

49152+12,pn$,gn 

if gn=B then open 1,8,15:print ” 

Cdown]”:gosub 3513 

return 

if bz=® then 3908 

print ”"[2down)”:input "programmname 
” ; pn$ 

sys 49152+15,pn$,gn 

if gn=8 then open 1,8,15:print : 

gosub 3513 

return 

rem 

if gn<>B then 3000 

print :print "disk befehl : 

print ”C[Ccbm @,left)”; 

get b$:if b$=""” then 3504 


if asc (b$)-28 then 3508 

if asc (b$)=13 then print ” ”:goto 

3511 

a$=-a$+b$:print b$; :goto 3503 

if len (a$)<1 then 3504 

a$-left$ (a$,len (a$)-1):print ” 
C2left)]”; 

goto 3503 

open 1,8,15,a$:print :if st=-128 

then close 1:goto 3908 

gosub 3513:goto 39098 

get #1,a$:print a$;:if st<>64 then 

3513 

close 1:poke 198,8:wait 198,1:poke 


3708 
3701 
3702 
3703 
38098 
3999 
4900 
4901 


4902 
4004 


| 4005 
4006 


4907 
4008 


4910 
4920 


49025 
4038 


4999 
5900 
5005 
5810 
5920 
5030 
5940 


59399 
690808 
6005 
6019 
6993 
7908 
7001 


7902 
7004 


7005 
7006 


7007 
7908 


79018 
7028 
7038 


7048 


7050 
73393 
8000 
8018 
8999 
190000 


12010 


190020 
12038 


HARDWARE 


198,8:return 
rem 
if gn<>8 then 30008 


print ”"[Cclr]”:sys 49152+18B: print 
open 1,8,15:goto 3512 

rem 

return 

if vo=® then return 

print "C[Cclr]Jeprom-start ? 50000 
[C7left)”; :input sa$:gosub 190008 

poke al,sa-int (sa/256)*256:poke ah, 
int (sa/256) 

print "[Cdownleprom-ende ?”C peek 
Cbz)+1)*256”"Cup]”:input "[iiright]”; 

sa$:gosub 100890 

poke el,sa-int (sa/256)*256:poke eh, 
int (sa/256) 

print ”"[downJmemory-start ? $2008 

[7left]”;:input sa$:gosub 190998 

poke qh,int (sa/256) 

if sa-int (sa/256)*256<>peek (al) 

then 4091 

print "C2downJeprom wird 
verifiziert”:sys 49152+6 

if peek Cok)=® then print ”[2down] 
alle bytes identisch” 

print :print ”"[downltaste” 

poke 198,8:wait 198,1:get a$:poke 
198,0 


return 

if vo=® then return 

print "CclrIJlsertest[l2down]” 
print "nicht gelosschte bytes : "”; 
sys 49152+3: print 

print ”"C2downltaste” 

poke 198,8:wait 198,1:get a$:poke 
198,8 


return 

if vo=® then return 

print "[clr]Jeprom wird ausgelesen” 
sys 49152 

return 

if vo=® then return 

print ”CclrJeprom-start ? 50008 
[C7left)”;:input sa$:gosub 19008 
poke al,sa-int (sa/256)*256:poke ah, 
int (sa/256) 

print ”"[downleprom-ende ?”C peak 
Cbz)+1)*256”Lup]”:input "Cilright”; 
sa$:gosub 19908 

poke el,sa-int (sa/256)*256:poke eh, 
int (sa/256) 

print ”[Cdown]Jmemory-start ? 52908 
[7left]”;:input sa$:gosub 10008 
poke qah,int (sa/256) 

if sa-int (sa/256)*256<>peek (al) 
then 7901 


sys 49152+9 

if peek (ok)=® then return 

print "C[C2downJeprom nicht korrekt 
programmiert” 

poke 198,8:wait 198,1:get a$:poke 
198,0 

return 

return 

rem fB 

print "[clr]J”:sys 64738 

return 

if left$ (sa$,1)<>”$” then sa=val 
(sa$):goto 10838 

sa-d:for i=® to 3:a$=-mid$ (sa$,i+2, 
1):sa=sa+( asc (a$5)-48+7*las>”@”))* 
161(3-i) 

next 

return 


Listing1 : Basicprogramm zur Menü-Steuerung 


REN TEE TER ei 


Nachträge und 
Korrekturen 


Das Programm „Fractal“ 
(RUN 8/87) arbeitet nur 
nach einer kleinen Korrek- 
tur fehlerlos. Diese Korrek- 
tur betrifft nur jene, die die- 
ses Programm mit dem 
Checker eingegeben haben! 
Die Programmteile sind ein- 
zeln zu laden, und nach der 
Eingabe folgender Poke-Be- 
fehle wieder abzuspeichern: 
Das Hauptprogramm 
(Listing 1): 

POKE 45,136:POKE 46,23: 
CLR SAVE,„name“,8 
Fehlerkorrektur beim zwei- 
ten Programm (Listing 2): 
POKE 45,101:POKE 46,15: 
CLR SAVE,„name“,8 

Das letzte Programm 
(Listing 3): 

POKE 45,49:POKE 46,12: 
CLR SAVE,„name“,8 

Jetzt läuft alles in den richti- 
gen Leiterbahnen! 


Nachtra 
RUN 9/8 


Das Listing des Monats 9/87 
„Falling Ball“ enthält einen 
Fehler, der leicht zu beheben 
ist: 

Das Programm ist in den 
Rechner zu laden — ohne zu 
starten — und nach folgen- 
den Befehlen (unter einem 
anderen Namen) wieder ab- 
zuspeichern. 
POKE43,1:POKE44,8 
(RETURN)POKE45,59: 
POKE46,42:CLR 
(RETURN) 
SAVE“name“,8 

Für alle, die Probleme mit 
ihren Listings haben, ist je- 
den Dienstag zwischen 16 
und 18 Uhr unter der Tele- 
fonnummer 089/3 60 86- 
228 ein Mitarbeiter erreich- 
bar, der weiterhelfen kann. 
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c008 
c08B 
c818 
c®18 
c229 
c®28 
c839 
c038 
c840 
c0848 
c858 
c058 
c060 
ca6B 
c079 
c078 
c088 
 c@88 
"| 090 
" e898 
cda®d 
cda8ß 
"6068 
 c®b8B 
= c08c® 
 edcB 
c8d® 
cdd8 
cded 
cdeB 
— c28fo 
cars 
= 2198 
=  c188 
& c118 
Li, 

x 


2 N 


x 


FIR EINATRURER: 


c118 

c120 
= c128 
Ku c13® 
BE c138 
c148 
c148 
c158 
c158 
c16® 
c168 
c178 
c178 
c188 
c188 
c198 
c198 
cla® 
claß 
c1b® 
c1b8B 
c1c® 
c1cB 
c1d® 
c1dB 
cled 
cleB 
c1Ff® 
cif8 
c298 
c208 
c218 
c218 
c228 
c228 
c230 
c238 
c240 
c24B 


Im Tail 


EN IEIFSTER NIT SF EN 


Listing 2: Brennsoftware für den RUN-Eprommer 


4c,15,c0,40,72,c0,4c,da, 

09,40,73,61,40,c8,03,“40, 
16,c4,4c,34,c4,78,a9,00, 

85,f8,a9,20,85,f9,a9,82, 

8d,03,de,ad,ee,cf,f®,06, 
ad,fc,cf,8d,83,de,ad,f4, 
cf,8d,03,de,ad,fS,cf,8d, 
03,de,ad,f6,cf,8d,083,de, 
a9,00,85,fb,ae,fb,cf,eßB, 
80,800,8c,00,de,a9,0F,8d, 
03,de,a9,0e,8d,03,de,a5, 
fb,8d,02,de,ad,21,de,S1, 
f8,c8,d®,e6,86,f9,e6,fb, 
ca,d®d,df,a9,80,8d4,03,de, 
58,60,78,a9,20,85,ab,85, 
fc,a9,82,84,03,de,ad,ee, 
cf,f90,06,ad,fc,cf,8d,03, 
de,ad,f4,cf,8d,83,de,ad, 
f5,cf,8d,03,de,ad,f6,cf, 
8d,03,de,a9,20,85,fb,ae, 
fb,cf,e8,a®,00,8c,00,de, 
a9,0f,8d4,03,de,a9,0de,8d, 
03,de,a5,fb,8d,00,de,ad, 
01,de,c9,ff,fF8,06,e6,ab, 
dd,902,e6,fc,c8,dd,de,e6, 
fb,ca,d®,d9,a9,80,84,83, 
de,a6,ab,a5,fc,20,cd,bd, 
58,60,78,ad,f2,cf,85,fF8, 
ad,ed,cf,85,f9,a9,82,8d, 
83,de,ad,se,cf,f®,86,ad, 
fc,cf,8d,03,de,ad,f4,cf, 
8d,23,de,ad,f5,cf,8d,23, 
de,ad,f6,cf,8d,23,de,ad, 
f3,cf,85,fb,a8,20,8c,ff, 
cf,ac,f2,cf,8c,80,de,aS, 
of,8d,03,de,a9,88,8d,23, 
de,aS,fb,8d,20,de,ad,®1, 
de,d1,f8,F0,13,a5,f9,20, 
S5a,c1,98,290,5a,c1,a9,20, 
20,d2,ff,a9,01,8d,ff,cf, 
c8,d0,04,86,f9,e6,fb,aS5, 
fb,cd,f1,cf,38,c6,cc,f®, 
cf,38,c1,39,80,8d,03,de, 
5B,69,48,4a,4a,4a,4a,20, 
65,c1,68,29,0F,29,30,c9, 


3a,90,02,69,06,20,d2,ff, 


69,78,ad,11,d0,29,ef,8d, 
11,d80,ad,11,d0,10,Ffb,ad, 
f3,cf,85,ae,ad,f2,cf,85, 
f8,ad,ed,cf,85,f9,ad,f®, 
cf,85,fa,ad,f1,cf,85,fb, 
a9,00,85,ab,a5,f8,85,a7, 
a5,f3,85,38,a5,ae,B5,ac, 
ad,ef,cf,9a,85,fe,a2,00, 
Ba,9d,99,c4,ca,d®,fa,aS, 
00,85,fc,a9,80,8d4,03,de, 
ad,f4,cf,8d,803,de,ad,fS5, 
cf,84,83,de,ad,f6,cf,8d, 
03,de,a9,07,8d,03,de,ad, 
fc,cf,8d,803,de,ad,fe,cf, 
8d,01,de,a9S,0d,8d,03,de, 
a9,0c,8d,03,de,a5,f8,8d, 
00,de,a9,0f,8d,03,de,aS, 
de,8d,03,de,a5S,ae,8d,9®, 
de,a6ß,fc,bd,89,c4,d®,24, 
a0,00,b1,F8,c9,ff,f2®,1c, 
8d,01,de,ad,fd,cf,8d,83, 
de,aS,fe,4a,aa,ad,Be,ea, 
88,d8,fc,ca,dd,f7,ad,fc, 
cf,84,83,de,e6,fc,e6,Ff&, 
£f0,0c,a5,ae,c5,fb,90,b5, 
a5,f8,c5,fa,30,af,e6,ab, 


ad,ef,cf,c9,801,F0,02,86, 
Fe,20,9f,c2,a5,fd,f8,15, 


SE 


HARDWARE 


| c258 
er fi c258 85,fB,a5,aa,85,f9,a5, ad, 


Y 


c9# 


c3 
d2 
62 
x; 
cd 
e2 
82 
88 


F2 


48 
63 
ec 
fo 
10 
07 
86 


d9 
8d 
12 
a7 
db 
29 
73 
4f 
le 
®c 
6a 
ı2 
db 
06 
cd 
75 
Sc 
33 
48 
7E 
f6 
gf 
29 
so 


ed 


8b 


00 
b2 
42 


c260 
c26B 
c278 
c278B 
c288 
c288 
c298 


' c238 


ob 7 


a 


RR 


y 


de 


sg 
ac 
od 
e7 
d9 
61 
81 
16 
66 
c9 
7a 
2b 
£7 


£E6 


74 


9a 


Fi. 
3f 
7f 
94 
£3 
3d 


c2a® 
c2a8ß 
c2b® 
c2bB 
c2c® 
c2c8 
c2d® 
c2d8 
c2ed 
c2e8B 
c2f® 
c2fB 
c398 
c308 
c318 
c318 
c328 
c328 
c338 
c338B 
c340 
c348 
c358 
c358 
c368 
c368 
c378 
c378 
c388 
c388 
c398 
c398 
c3ad 
c3a8 
c3b® 
c3b8 
c3c® 
c3c8 
c3d® 
c3d8 
c3e® 
c3e8 
c3f® 
c3fB 
c49® 
c4988 
c41® 
c418 
c420 
c42B 
c43® 
c438 
c440 
c448B 


‚ c45® 


c458 
c460 
c468 


' c470 


c478 


" c4B0 


c488 


” c499 


c498 


a5,3b,c9,19,f®,2b,a5,a9, 


B5,ae,4c,b7,c1,e6,f9,e6, 

ae,a9,00,85,f8,a5,ae,c5, 

fb.90.08,.d0.09.a5,F8.c5, 
fa,b8,03,4c,98,01,a9,08, 
2c,a9,01,8d,ff,cf,a9,c®, 
8d,01,de,a9,0d4,8d,83,de, 
a9,0c,8d,03,de,ad,11,d®, 
09,10,84,11,d0,58,68,a9, 
c8,8d,01,de,a9,0d,8d,03, 
de,a9,0c,8d4,03,de,a9,82, 
8d,23,de,ad,ee,cf,f®,06, 
ad,fc,cf,8d,23,de,ad,f4, 
cf,8d,03,de,ad,fS,cf,Bd, 
83,de,ad,f6,cf,8d,23,de, 
a93,06,8d,03,de,a3,08,8d, 
03,de,a5,a7,85,f8,85,a9, 
a5,28,85,f9,85,aa,a5,ac, 
85,ae,85,ad,a2,00,86,Fd, 
a5,37,8d,00,de,a9S,0Ff,8d, 
03,de,a9,80e,8d,23,de,a5, 
ac,8d,00,de,a0,00,ad,®1, 
de,di1,a7,f0,06,fe,33,c4, 
cB,84,fd,e8B,86,a7,f®d,Be, 
a5,ac,c5,fb,30,d2,d2,06, 
a5,a7,05,fa,50,ca,a9,8B®, 
8d,03,de,ad,f4,cf,8d,03, 
de,ad,f5,cf,8d,03,de,ad, 
f6,cf,8d,83,de,a9,27,8d, 
03,de,ad,fc,cf,8d,23,de, 
ad,fe,cf,8d,21,de,a9,0d, 
8d,03,de,a9,0c,8d,03,de, 
a2,00,86,fc,a5,f8,8d,00, 
de,a9,0f,8d,03,de,a9,de, 
8d,03,de,a5,a8,8d,00,de, 
a6,fc,bd,99,c4,c9,01,d®, 
20,a0,00,b1,F8,8d,21,de, 
ad,fd,cf,8d,203,de,a5S,ab, 
Da,aa,a®d,Be,ea,88,d®,fc, 
ca,d®d,f7,ad,fc,cf,8d,23, 
de,s6,fc,e6,a7,f®d,0e,a5, 
ae,c5,fb,90,b7,d0,06,85, 
f8,c5,fa,30,af,a9,c20,8d, 
01,de,a9,2d,84,23,de,aS, 
2c,8d,03,de,a9,06,8d,03, 
de,650,29,00,85,fa,a9,20, 
85,fb,a0,00,a9,Ff,31,Ffa, 
88,d0,Ffb,e6,fb,a6,fb,e®, 
a0,d0,f3,20,73,20,20,d4, 
e1l,a9,24,20,d2,ff,a9,20, 
20,5a,c1,a9,080,20,5a,c1, 
a9,a0,20,d2,ff,a9,2d,20, 
d2,ff,a9,20,20,d2,Fff,aS, 
00,22,00,a0,20,20,d5,ff, 
a9,24,20,d2,ff,98,20,5a, 
c1,8a,20,53,c1,60,20,73, 
00,20,d4,e1,a9,00,85,F8, 
a9,20,85,f9,a2,00,ac,fb, 
cf,c8,98,18,69,20,a8,a9, 
F8,4c,d8,ff,89,24,85,Fb, 
a9,fb,85,bb,a9,00,85,bc, 
a9,201,85,b7,39,08,85,ba, 
a9,60,85,b9,20,d5,f3,a5, 
ba,20,b4,ff,a5,b9,20,96, 
ff,a9,00,85,90,a0,03,84, 
fb,20,85,ff,85,fc,a4,90, 
d®d,2c,20,a5,ff,a4,90,d®, 
25,a4,fb,88,d0,e9,a6,fc, 
20,cd,bd,a9,20,20,a5,ff, 
a6,90,d0,12,aa,f0,06,2®, 
d2,ff,4c,7d,c4,a9,0d,2®, 
d2,ff,a0,02,d0,c9,4c,42, 
f6,00,00,00,02,00,00,08, 


DIESE SEITE FEPILT 
LEIDER 
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zur Adressierung der RAM- 
Bausteine 
Die beiden Multiplexer stek- 
ken auf Platine I und 2 je- 
weils in den Positionen U-13 
und U-25. Bei Platine 3 stek- 
ken beide im IC der Position 
U-8. 
(12) Adreß/Multiplexer IC 
251715 
Dieser Baustein findet sich 
nur auf Platine 3. Er mana- 
ged die Speicherverwaltung 
des C64 und enthält quasi 
alle Multiplexer- und Adreß- 
manager-ICs der alten Mo- 
delle. 
(13) RAM-Speicher 
Bei Platine 1 und 2 kommen 
die 64-KByte-Speicher des C64 
durch acht 8 KByte-RAM- 
Bausteine des Typs 4164 in 
den Positionen U-9 bis U-12 
und U-21 bis U-24 zustande. 
Auf Platine 3 stecken zwei 
32 KByte-RAM-Bausteine 
des Typs 41464 in Position 
U-10 und U-11. 
Das waren auch schon die 
wichtigsten Unterschiede. 
Bei Betriebssystem-Um- 
schaltplatinen (eine für Pla- 
tine 3 wird in Kürze als Bau- 
anleitung veröffentlicht!) 
und Hardware, die an einem 
Port angeschlossen wird, 
gibt es kaum Probleme mit 
Platine 3. Umfangreiche 
Bauanleitungen wie die in 
RUN veröffentlichten Spei- 
chererweiterungen 128-K- 
System und BMS-System, 
lassen sich jedoch nicht ein- 
—yere EN IEN bauen! Was Software-Kom- 
T: ne 7 patibilität anbelangt, berei- 
tet der „neue“ C64 keine 
Schwierigkeiten — alle Pro- 
gramme und Steckmodule 
arbeiteten im Praxistest ein- 
wandfrei. RUN wird sich 
bemühen, das neue Modell 
bei künftigen Bauanleitun- 
gen zu berücksichtigen, und 
alte Schaltungen anzupas- 
sen. Hier ist Rat von Lesern, 
die sich mit der neuen Plati- 
E = 7 nme beschäftigen, herzlich 
N BE willkommen. 
Bild 4: Platine 3 — die jüngste C64-Platine mit deutlich weniger Bausteinen (Sigismund Unterstaller/mn) $ 
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um Umbau 
des RUN- 
Eprommers 
sind nur wenige 
Bauteile und etwas Bastelge- 
schick notwendig. Im Ver- 
gleich zum alten Modell hat 
sich einiges geändert: 

— Zur Spannungsversor- 
gung ist kein externes Netz- 
teil mehr erforderlich, 

— Sichere Handhabung: 
Zerstören eines Eproms 
durch Herausnehmen ist 
kaum noch möglich. 


term Sockel von IC2 und 
IC3 die Leitung zu durch- 
trennen, zwickt man die 
Stege der Sockel heraus. 

2. Die Widerstände R5, R6, 
R7, R8, R10 und RIl und 
der Transistor T3 (im Be- 
stückungsplan RUN 10/86, 
Bild 5, sind die Bezeichnun- 
gen T3 und T4 vertauscht!) 
müssen ausgelötet werden. 
Zwei Widerstände — R6 


und R10 — müssen stehend, 
wie in Bild 3, eingelötet wer- 
den. 


Bild 1: Der umgebaute RUN-Eprommer. 


Die neue Brennsoftware 
hat’s ebenfalls in sich: 
— Menügesteuerte 
tionsauswahl. 

— Schneller intelligenter 
Algorithmus zum schonen- 
den Brennen von Eproms. 
Eprommer-Umbau Schritt 
für Schritt 

1. Zuerst müssen folgende 
Leitungen auf der Platinen- 
unterseite gemäß Bild 4 
durchgekratzt oder ange- 
bohrt werden (nicht die Pla- 
tine durchbohren): Gleiches 
gilt für die Platinenoberseite 
(Bild 5). 

Bild 4 stellt das Layout der 
Platinenunterseite (Bild 5 
die Platinenoberseite) in 
hellgrau und die Unterbre- 
chungen in rot dar. Um auf 
der Platinenoberseite un- 


Funk- 


3. Für das Zusatz IC8 und 
die anderen Zusatzteile müs- 
sen die Löcher wie in Bild 6 
gebohrt werden. Bild 6 stellt 
das Layout der Platinen- 
oberseite in hellgrau, die Lö- 
cher in blau, die Bestückung 
der neuen Teile in rot dar. 
Die zusätzlichen Bauteile 
und die zwei Widerstände 
R5 und Ri1 werden dann in 
die Platine eingesetzt. 

4. Jetzt müssen zusätzliche 
Verbindungen auf der Plati- 
nenunterseite wie in Bild 7 
dargestellt, mit isoliertem 
Draht hergestellt werden. 
Bild 7 zeigt das Layout der 
Platinenunterseite in hell- 
grau und die neuen Verbin- 
dungen in rot, die Lötpunk- 
te in grün. 

5. Vom Expansionport Pin- 
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Ce /psrun 


RUN-EPROMMER: 
IK PRO SEKUNDE 


Jetzt wird der RUN-Eprommer zu einem der 
schnellsten 664 Eprommer umgebaut. Grundlage 
ist ein Gerät, das nach Bauanleitungen aus 
RUN 8, 9, 10/86 aufgebaut wurde. 


x 


Bild 3: Spannungsversorgung über Userport. 
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Bild 4: Die gekennzeichneten Leiterbahnen müssen durchgekratzt werden. 
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Bild 5: Notwendige Leiterbahnunterbrechungen auf der Platinenoberseite. = 
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Bild 7: Die roten Verbindungen müssen mit Draht hergestellt werden. 


7 (IOl) oben, muß eine Ver- 
bindung durch das zusätzli- 
che Loch zu der Leiterbahn 
die ursprünglich mit Pin 7 
(A14) der Unterseite verbun- 
den war, hergestellt werden. 
6. Zur  Spannungsversor- 
gung (+PRG) kann die 
Schaltung wie in Bild 8 ver- 
wendet werden. Dazu müs- 
sen lediglich die Pins 10 (9V), 
11 (9V) und 12 (GND) vom 
Userport abgegriffen wer- 
den. Diese Schaltung beein- 
flußt ein angeschlossenes 
Parallelkabel nicht, da die 
Leitungen zu den Pins am 
Userportstecker angelötet 
werden können. 


Ce /pusrein 


dann Eprommer einstecken 
und zuletzt Spannungsver- 
sorgung herstellen. Wäh- 
rend des Brennvorgangs 
darf das Eprom nicht aus 
der Textool-Fassung ent- 
nommen werden! 

Bei der neuen Brennsoft- 
ware (siehe Listingtext) wur- 
de großen Wert auf Anwen- 
derfreundlichkeit gelegt. 
Sämtliche Brenn-Funktio- 
nen und Einstellungen wer- 
den über Menüs aufgerufen 
und sind mit Sicherheitsab- 
fragen ausgestattet. Bei der 
Angabe der Adressen kön- 
nen Dezimal- oder Hex-Zah- 
len eingegeben werden. Soll 
das gesamte Eprom ge- 


brannt wurde, kann mit 
Funktionstaste F-2 im 
Hauptmenü die Brenn- 


impuls-Dauer erhöht wer- 
den. Bei neueren Eprom-Ty- 
pen mit 12,5 Volt Brenn- 
spannung, sollte die Brenn- 
impuls-Dauer nicht zu sehr 
erhöht werden (etwa auf 5- 
15 ms). 

(T. Borris/T. Meidinger/mn) 


Zum Umbau erforderliche 
Bauteile 

R21-R26, jeweils 5,1 
kOhm 

T2-T8, jeweils BC 547 
IC-8 Typ 7407 

für’s Netzteil: 

C1-C4, jeweils 220uF/40 
Volt 

D1-D3, jeweils IN4001 
Lochrasterplatine 


c2 


brannt werden, so stellt das 
Programm die Default-Wer- 
te automatisch ein. Falls ein 
Eprom nicht 


Neue Brennsoftware 


Vor der Inbetriebnahme erst 


den Rechner ausschalten, korrekt 


ge- 


- c4 
USER-PORT c3 Fan 
C=4x 220uF/40V 
Di=3x IN4001 


Bild 8: Schaltung für Userport-Netzteil 


ABACOMP 


Bestellungen bitte nur schriftlich an ABACOMP GmbH, 
Kransberger Weg 24 - 6000 Frankfurt am Main 50 
Mindestbestellwert: 50,— DM, »Ru9« angeben. 
Ladenöffnung: Mo-Fr von 10 - 12 u. 14 - 18 Uhr, Heer- 
straße 149, 6000 Frankfurt/M. 90, Technische Auskunft: 
täglich von 8 - 9.30 Uhr unter (069)763039 


# 
ABACO -PC’s made in Germany 

ABACO 16E£, Profi-DIN-Tastatur, 1x 360 KB Disk, 256 KB RAM, Color-Grafik- 

Karte, Kompaktgehäuse .... 

ABACO 16HS, wie 16E, jedoch mit großem Gehäuse, 2 x 360 KB Disk Slim- 

Line, 640 KB RAM, Druckerschnittstelle, entweder mit Color-Grafik-Karte 

oder herkules-kompatibler Grafik-Karte .... { 

ABACO 16HS wie vor, jedoch nur 1 Disklaufwerk und 30 MB Festplatte 
| ABACO 16, der Profi, wie ABACO 16HS, aber zusätzlich 2 Jahre Garantie, 
serielle (Datenfernübertragung) und parallele (Drucker-) Schnittstelle, akku- 
gepufferte Uhr, extra leiser Lüfter, Game-Port, Komfort-Tastatur mit 105 
Tasten, Turbo-Modus mit 8MHz Taktfrequenz ..... 
Aufpreis für herkules-kompatible Grafik-Kartet. ABACO 104,...% . 57, 
ABACO 16-286 AT-kompatibel, 1 MB RAM, 6/10 MHz, 2 Disklaufw. je1 ‚2MB 2622.- | 
Achtung! renztes Sonderangebot: 
ABACO 16 HS m. 1 Disklaufw. u. 10 MB-Festpl. 1539,— 
Festpl,-Kit 10 MB (nur XT) 513,— 


Sonderangebote solange Vorrat reicht: 


Festpl.-Kit 15 MB (nur xt) 570,— 
Festpl.-Kit 20 MB (nur xt) 684,— | 


XT/AT-Zubehör, getestet 
rar ger mit 
RAM (nur XT) 
Gehäuse 
Komfort-Tastatur, 105 Tasten 
XT oder ATangeben) . 
lor-Grafik-Kärte .... 
herkules-kompat. Grafik-' Karte” 
EGA-Karte 


Computer anderer 


renommierter Hersteller 
Schneider PC-1512..........ab 1368,— 
Atari 260ST m. Disk 354u.Maus . 798,— 
Atari 1040 ST m. SM 124 u. Maus 1482,— 
Floppylaufw. Ori Ser SF354 ..199,50 
Commodore C-128 1083, 
399 AMIGA500 . 
Disklaufwerk 360 KB, japanisches eg 3078,- 
a ir AT :388:30 || 2.Disklaufwerk3 1/2” ... 3363,- 
eye a © Biskettenlaufwerk 3 1/2", 2x 80 Spur, 
Diskcontroller m. Kabel ig ann 45,60 für AMIGA.od. Atari ST 228 
enge ruf bag so Eis _ || dito, fertig mit Gehäuse u Kabelset 
| Festplätten-KsOMB nur X)... 7a1,- | zum direkten Anschluß an 
Festplatten-Kit 60 MB (nur XT) 1482,- || 


Achtung! Für Bastler: 
. 1197,— || Datassetten für C-64/128 usw. mil 
1083,— || Fehlern, die von versiertem Bastler | 
a — || leicht zu beheben sind 2 St.-Paket 16,— | 
"495 - || | 
708 ||L_ | 


Viele weitere Produkte auf Anfrage, Händleranfragen erwünscht. 
Wir suchen ständig neue Mitarbeiter für Verwaltung und Verkauf, 


Drucker 
| EPSONLG a 800 (24 Nadeln) . 


Star NL-10 . - 
Olivetti DM100, 120Z/sec. .. 
Seikosha SL-80 Ai (24 Nadeln) . 


TEEN EEE ee 


Wenn mal was nicht funktioniert ... 
® 


— 


| ei commodore 


Installation 
Wartung 
Reparatur 


Technischer 
Kundendienst 


Im gesamten Bundesgebiet vertreten 
70 Niederlassungen 

Hotline Bereich Nord (040) 2201913 

Hotline Bereich Mitte (0201) 35923 

Hotline Bereich Süd (08165) 74220 
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In RUN 9/87 wurde ausführlich der Aufbau der 512KByte- 
Speichererweiterung für den 664 besprochen. Diesmal wird die 
Systemsoftware für die vier Eproms auf der BMS-Platine vorgestellt. 


evor man in 
den Genuß 
des Riesenspei- 
chers für den 
C64 kommt, müssen erst 
noch die vier Eproms für 
die BMS-Platine gebrannt 
werden. Im folgenden wird 
jeder Brennvorgang aus- 
führlich beschrieben. 

1. Das Monitor-Eprom 

In dieses Eprom wird der 
BMS-Maschinenmonitor ge- 
brannt (Listing 1 generiert 
das File BMS-Monitor). 
Hierzu wird ein Eprom des 
Typs 2764 benötigt. Nach 
dem Brennen kommt das 
Eprom in Steckplatz IC4 der 
BMS-Platine. 

2. Das BASIC-Eprom 
Listing 1 generiert das File 
BMS-BASIC, das in ein 
Eprom 27256 gebrannt 
wird. Das File muß in den 
hinteren S8K-Bereich des 
Eproms gebrannt werden! 
Von den 32K-Speicher des 
27256 Eproms werden für 
das BASIC nur 8 KByte be- 
nötigt. Die restlichen 24 K im 
Eprom sind für Anwender- 
programme freigehalten. 
Wie man eigene Programme 
ins Eprom einbindet, wird in 
der nächsten Folge ausführ- 
lich beschrieben. Zum Aus- 
testen der BMS-Hardware 
reicht das Brennen des BA- 
SIC zunächst aus. Das ge- 
brannte Eprom kommt in 
Steckplatz IC5 auf der 
BMS-Platine. 

3.Das Kernal-Eprom 

Hier wird ebenfalls ein 
Eprom 27256 benötigt. In 
den 32-KByte-Speicher des 


Eproms können vier Be- 
triebssysteme eingebrannt 
werden. Im Prinzip läßt sich 
hierfür jedes beliebige Be- 
triebssystem hernehmen — 
sowohl das Original-C64- 
Kernal als auch ein modifi- 
ziertes Kernal. 

Damit das jeweilige Be- 
triebssystem mit dem BMS- 
System zusammenarbeitet, 
müssen allerdings die vom 
BMS-System benötigten 
Routinen miteingebaut wer- 
den. Dies geht so: 

Zunächst wird das Betriebs- 
system, welches modifiziert 
werden soll, in den RAM- 
Bereich von 14x 4096 bis 
65535 geladen. 


. Dann wird der Adreßbereich 


von E4b7-E4D9 in einen 
nicht programmierten Be- 
reich verschoben. Danach 
wird in den freigewordenen 
Bereich die BMS-Routine 
(Listing 2) eingebaut. In 
Adresse FF58 des Betriebs- 
systems steht folgender Be- 
fehl: 

.FF58 JMP ($0314) 

Er wird geändert auf 

.FF58 JMP E4B7 

Jetzt ist das Betriebssystem 
mit dem BMS-System lauf- 
fähig und kann ins Eprom 
gebrannt werden. 

Wie gesagt, ist im Eprom 
Platz für vier Betriebssyste- 
me, zwischen denen per Ta- 
statur absturzfrei umge- 
schaltet werden kann. Hier- 
bei muß beachtet werden, 
daß auch tatsächlich vier Be- 
triebssysteme ins Eprom ge- 
brannt werden müssen (man 
kann ein und dasselbe Be- 
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triebssystem natürlich auch 
mehrmals ins Eprom bren- 
nen, insofern man keine vier 
verschiedenen benötigt), da 
es sonst passieren kann, daß 
der Rechner abstürzt, wenn 
auf einen Eprom-Bereich 
umgeschaltet wird, in dem 
kein Betriebssystem steht. 
In einen der vier Eprom-Be- 
reiche sollte unbedingt ein 
Original-C64-Kernal ge- 
brannt werden. Original, 
das heißt ohne die oben be- 
schriebenen BMS-Routinen. 
Dies ist erforderlich, da es 
mehrere Programme gibt, 
die nur mit dem Original- 
Kernal laufen — insbeson- 
dere Programme mit auf- 
wendigem Kopierschutz. 
Achtung: Schaltet man von 
einem BMS-Betriebssystem 
(darunter versteht man alle 
Betriebssysteme, die mit den 
BMS-Routinen versehen 
sind) aufs Original-Kernal 
um, so kann man nicht mehr 
die Vorteile des BMS-Sy- 
stems nutzen — es liegt dann 
ein gewöhnlicher C64 vor! 
Das Betriebssystem, das im 


Platinenservice 


letzten 8KByte-Bereich des 
Eproms liegt, wird beim 
Einschalten des Rechners in- 
stalliert — hier sollte folg- 
lich kein Original-Kernal in- 
stalliert werden. 

Listing 1 generiert ein BMS- 
Kernal mit Filenamen 
„BMS-KERNAL“. In die- 
sem Kernal sind wichtige Ini- 
tialisierungsroutinen. Des- 
halb muß es unbedingt im 
letzten 8K-Bereich des Ker- 
nal-Eproms stehen! 

Das fertige Eprom kommt 
in Fassung IC6 der BMS- 
Platine. 

4. Das Zeichensatz-Eprom 
Beim BMS-System können 
vier Zeichensätze in den C64 
eingebaut werden, zwischen 
denen man beliebig um- 
schalten kann. 

Benötigt wird hierzu ein 
Eprom des Typs 27128. 

In den letzten 4-Kbyte-Be- 
reich des Eproms brennt 
man den Original-C64-Zei- 
chensatz. 

Listing 1 generiert ein File, 
mit einem deutschen DIN- 
und einem Original-C64- 


Im Gegensatz zu bisherigen in RUN veröffentlichten 
Bauanleitungen gibt’s diesmal kein Platinenlayout. Dies 
hat einen guten Grund: Die BMS-Platine ist, aufgrund 
ihres feinen Layouts, im Hobbylabor kaum herzustellen. 
Leerplatine mit Anschlußkabeln 39.90 Mark. 

Bausatz komplett mit Platine und Teilen 248 Mark. 


Bestellungen an: 

CTJ Computer-Technik 
Spieckern 11 

5600 Wuppertal 
Telefon 0202/612011 


Großer Programmierwettbewerb 
2000 Mark für die beste BMS-Idee 


Damit es bald zahlreiche BMS-spezifische Anwendungs: 
programme gibt, startet in dieser Ausgabe ein großer 
Wettbewerb zum System. Gesucht werden Tips und 
Tricks und Programme für die 320-K-Erweiterung. Hier 


einige Anregungen: 
— RAM-Floppy: Ein Programm, das in eine oder meh- 
rere RAM-Bänke als Speicher initialisiert. Ideal wäre ein 
Programm, mit dem es möglich ist, eine komplette Dis- 
kette ins RAM zu lesen, wobei auch dort alle Disketten- 
befehle zulässig sind. 
— Drucker-Puffer: Verwendung einer RAM-Bank als 
64-KByte-Druckerpuffer. 
— Super-DIA-Show: 32-KByte-Speicher bietet Platz für 
etwa 40 Grafikseiten. Durch schnelle Umschaltung kann 
ein Trickfilmeffekt erzielt werden. 
— Super-Parallel-Copy: Nur einmal Diskettewechseln 
| bei der Backup-Anfertigung — das BMS-System bietet 
die Möglichkeit, ein solches Super-Copy zu entwickeln. 
— BASIC-Erweiterung, die das Programmieren der 
RAM-Bänke von BASIC aus gestattet. 
Dies sind nur einige Anwendungsideen, die sich mit der 
Bauanleitung des Jahres realisieren lassen. Dem fündi- 
gen Programmierer fallen sicher noch zahlreiche weitere 
Anwendungen ein. Nicht immer muß das Rad neu erfun- 
- den werden: Für den Wettbewerb können deshalb sämt- 
liche, bislang in RUN veröffentlichte Listings hergenom- 
men, und an die 320-K-Erweiterung angepaßt werden. 


Programme schicken an: RUN 

Kennwort: BMS-Wettbewerb 

Rheinstr. 28 

8000 München 40 
Einsendeschluß ist der 16. 11. 87 (Datum des Post- 
stempels) 


Wer Fragen zum Wettbewerb hat, oder seine Ideen be- 
züglich des BMS-Systems vorstellen möchte, ruft ein- 
fach in der Hardware-Abteilung bei Herrn Nickles (Tel.: 
089/36086-252) an! 


| 


ASCII-Zeichensatz unter C64-Original-Kernal und 


HARDWARE 


der RUN-o-THEK-Dis- 
kette 10/87 erhältlich. 
Das gebrannte Eprom 
7 kommt in Steckplatz IC7 
der BMS-Platine. 
Damit ist die Hardware 
/ des BMS-Systems fertig 
aufgebaut. 
Wird der aufgerüstete C64 
= eingeschaltet, so sollte er 


i > sich nach 1-2 Sekunden mit 
dem Titelbild des Betriebs- 
systems melden, das in den 


letzten 8-KByte-Bereich des 
Betriebssystem-Eproms ge- 
brannt wurde. Tut er es 
nicht, so wurde beim Zu- 
sammenbau der Hardware 
bzw. Brennen der Eproms 
etwas falsch gemacht. In 
diesem Fall Rechner sofort 
ausschalten, alle Verbindun- 
gen nochmals gründlich 
überprüfen, Platine auf kal- 
te Lötstellen hin untersu- 
chen und Inhalt der Eproms 
mit den Brenn-Files verifi- 
zieren. 


Arbeiten mit dem 
BMS-System 


Die einfachste Anwendung 
des BMS-Systems besteht 
darin, fünf, quasi von ein- 
ander unabhängige C64, zu 
nutzen. 

Möchte man beispielsweise 
mit einer Datenbank arbei- 
ten, so geht man beim auf- 
gerüsteten C64 so vor: 
Zunächst wird die Daten- 
bank von Disk geladen. 
Möchte man während der 
Arbeit einen Kurzbrief 


schreiben, so wird einfach in 
die nächste freie RAM-Bank 
geschaltet, und dort das 
Textprogramm geladen und 
gestartet. Jetzt hat man Da- 
tenbankprogramm und 
Textverarbeitung gleichzei- 
tig im Rechner und kann be- 
liebig zwischen beiden hin- 
und herschalten. Nach 
einiger Zeit möchte man 
vielleicht ein Backup der ak- 
tuellen Datendiskette 
machen. Die Datenbank hat 
hierfür eine Routine vorge- 
sehen, die nicht gerade die 
schnellste ist. Also, in die 
nächste freie RAM-Bank ein 
Kopier-Programm laden 
und Backup damit anferti- 
gen. Jetzt sind drei Anwen- 
derprogramme im Rechner, 
mit denen gearbeitet werden 
kann, und zwei Bänke sind 
sogar noch frei. 

Mit dem BMS-System spart 
man sich folglich viel Zeit 
die beim Arbeiten sonst mit 
Laden unterschiedlicher 
Hilfsprogramme verbracht 
wird. 

Sämtliche Umschaltmög- 
lichkeiten des BMS-Systems 
finden über Tastatur statt. 
Hier die Tastenkombinatio- 
nen im einzelnen: 


Seiten- 
umschaltung 


Die „fünf C64* im BMS- 
System werden durch gleich- 
zeitiges Drücken von CTRL- 
Taste, RUN/STOP-Taste 
und einer der Zifferntasten 
1-5 angewählt: 


den Filenamen „BMS-ZEI- 
CHENSATZ“. Dieses File 
brennt man in die zweite 
Hälfte des 27128er Eproms. 
Die beiden jetzt noch freien 
Bereiche im Eprom können 
mit beliebigen Zeichensät- 
zen belegt werden. 

Auf der RUN-o-THEK-Dis- 
kette dieser RUN-Ausgabe 
befinden sich neben dem mit 
BMS-Routinen versehenen 


dem Brenn-File fürs Monitor- 
eprom noch zwei weitere 
Zeichensatz-Files, die in den 
freien EPROM-Bereich ge- 
brannt werden können. 

— ASCII 5*7 Matrix (USA) 
— DIN 5*7 Matrix 
(DEUTSCH) 

Diese Zeichensätze werden 
aus Platzgründen nicht als 
Listing im Heft veröffent- 
licht. Sie sind daher nur auf 


TEE ee: 


Fehlerkorrektur zur BMS-Bauanleitung, Teil 1 

Im ersten Teil der BMS-Bauanleitung in RUN 9/87 ha- 
ben sich leider einige Fehler eingeschlichen: 

— Bei Bild 1 fehlen die roten Umrandungen der Bautei- 
le, die gesockelt werden müssen. Die Sockel sind jedoch 
auf dem Bild deutlich zu erkennen. 

— Bei Skizze 3 ist ein kleiner Pfeil mit der Bezeichnung 
IC 6 zu sehen. Richtig muß es IC5/IC7 heißen. 

— Die BMS-Leerplatine kostet nicht 29.90 Mark, wie 
im Kasten Platinenservice zu lesen ist, sondern 39.90 
Mark. 
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CTRL + RUN/STOP + 1 
= RAM-Bank 1 
(64K Hauptspeicher) 


CTRL + RUN/STOP + 2 
= RAM-Bank 2 
(64K Hauptspeicher) 


CTRL + RUN/STOP + 3 
= RAM-Bank 3 
(64K Hauptspeicher) 


CTRL + RUN/STOP + 4 
= RAM-Bank 4 
(64K Hauptspeicher) 


Es kann jederzeit absturz- 
frei umgeschaltet werden, 
auch während dem Ablauf 
eines Programmes. Beim 
Umschalten in eine andere 
Bank, friert das BMS- 
System die wichtigen Pro- 
grammzeiger der RAM- 
Bank, die verlassen wird, 
ein. 

Beispiel: In RAM-Bank I 
steht folgendes Programm: 

10 print„Hallo“ 

20 goto 10 

Startet man das Programm, 
so scrollt eine Folge von 
„Hallo“ über den Bild- 
schirm. Während des Pro- 
grammablaufs drückt man 
nun CTRL+RUN/STOP +2 
und gelangt in RAM-Bank 
2. Wird jetzt auf Bank 1 zu- 
rückgeschaltet, so laufen die 
„Hallo“s weiter. 

Achtung: Beim Drücken der 
Tastenkombination für die 
Umschaltung stets die 
CTRL-Taste zuerst drücken 
— drückt man RUN/STOP 
zuerst, so wird ein laufendes 
BASIC-Programm kurz vor 
dem Umschalten unterbro- 
chen. 

In zwei Fällen ist die Um- 
schaltung problematisch: 

1. Bei Programmen, die arg 
im Betriebssystem des C64 
herumspielen bzw. wüst mit 
den Interrupt-Vektoren um- 
gehen (in erster Linie Spiel- 
programme), kann es passie- 
ren, daß der Rechner auf 
Umschaltung nicht reagiert. 
Bei professionellen Anwen- 
derprogrammen wie Super- 


| HARDWARE 


base, Vizawrite etc, tritt die- 
ses Problem nicht auf. 

2. Während ein Programm 
auf Diskette zugreift, sollte 
nicht umgeschaltet werden. 
Man bedenke stets, daß 
zwar auf fünf C64 zugegrif- 
fen werden kann, die jedoch 
alle an derselben Floppy 
hängen! 


Betriebssystem- 
umschaltung 


Beim BMS-System kann ab- 
sturzfrei zwischen vier Be- 
triebsystemen umgeschaltet 
werden. Dies geschieht mit- 
tels gleichzeitigem Drücken 
von CTRL-Taste, linker 
SHIFT-Taste und einer der 
Funktionstasten. 


CTRL + SHIFT links 
+ F-1 = Kernal I 


CTRL + SHIFT links 
+ F-2 = Kernal 2 


CTRL + SHIFT links 
+ F-3 = Kernal 3 


CTRL + SHIFT links 
+ F-4 = Kernal 4 


Beim Umschalten in eine an- 
dere Bank, die noch nicht 
initialisiert ist (= zum ersten 
Mal angewählt nach Ein- 
schalten des Rechners), wird 
automatisch das Betriebs- 
system übernommen, das in 
der Bank aktuell ist, die ver- 
lassen wird. 


Zeichensatz- 
umschaltung 
Die vier Zeichensätze im 
System werden über die Ta- 
stenkombination CTRL + 
RUN/STOP + eine der Ta- 
sten A-D aufgerufen: 
CTRL+ RUN/STOP + A 
= 1. Zeichensatz 
CTRL+ RUN/STOP + B 
= 2. Zeichensatz 


CTRL+ RUN/STOP + C 
= 3, Zeichensatz 


CTRL+ RUN/STOP + D 
= 4. Zeichensatz 
Die Tastaturbelegegung des 


Wunde 


DIN-Zeichensatzes 

schaulicht Tabelle 4. 
Die Umbelegungder Tasten ist 
im BMS-Kernal vorgenom- 
men. Bei eigenem Betriebssy- 
stem liegen die deutschen 
Zeichen auf anderen Tasten, 


veran- 


falls nicht modifiziert wird. gramm. Anhalten ist mittels 
Tabelle 1: Anschlußbelegung: 

USER-PORT CENTRONICS-STECKER 
BEZ. ANSCHL. BEZ. ANSCHL. 
PB 0-7 PIN C-L D 1-8 PIN 2-9 
CAl PINB ACK PIN 10 
CA2 PINM STROBE PIN 1 
GND PINN/1I2 GND PIN 19 


Funktionstasten- 
belegung 


Die Funktionstasten des C64 
sind beim BMS-System mit 
nützlichen Routinen belegt: 
F-1 listet ein BASIC-Pro- 


Tabelle 2: Monitor-Befehle und Beispiele 


A 1000 LDA #$F0 


C E000 FFFF 8000 


Direktassemler. Direkteinga- 
be von Assemblerbefehlen 
Vergleicht den Bereich E000- 
FFFF mit 8000-9FFF 


D EO000 Disassembliertt ab Adresse 
E000 (Scrollen m. Cusor) 

F 8000 9FFF 00 Speicher von 8000-9FFF m. 
00 füllen. 

G E394 GO Befehl. (E394 =Basic- 
Kaltstart) 

I EO000 ASCII-Dump ab E000 

M Hex-Dump ab E000 
Zeigt Registerinhalte 


R 
S „NAME“ 8000 A000 


T  E000 FFFF 8000 


Speichert den Bereich 8000 
bis A000-1 ab. 

Kopiert den Bereich E000- 
FFFF nach 8000-9FFF 


X EXIT. Führt einen Basic- 
Kaltstart aus. 

#3452 Umwandlung Dezimal zu 
HEX und BINÄR. 

$00FD Umwandlung Hex zu BINÄR 
und DEZIMAL. 

%01001011 Umwandlung Binär zu HEX 
und DEZIMAL. 

F7 Directory einlesen. 

F5 Laden (wie in Basic) 


L „NAME“1000 


Lädt ab Adresse 1000 HEX. 


Die Befehle werden mit Return abgeschlossen, Ausnah- 


me sind die F-Tasten. 


(arm 


Tabelle 3: BMS-Systemadressen 


1. Adresse $DD40 = Portadresse für ROM-Bänke 

Bit 7= Adressbit Al2 

Bit 6=Adressbit All Monitor Eprom organisiert in 
4x2K 

Bit 5= Adressbit Al4 Basic Eprom organisiert in 4x8 
K (24K frei) 

Bit 4= Adressbit Al3 XX11XXXX=Basic V2 

Bit 3= Adressbit Al4 Kernal Eprom 4x8K 

Bit 2= Adressbit Al3 XXXX11XX = BMS-Kernal 
XXXX10XX = Prologic I 
XXXX01XX = Prologic 2 
XXXX00XX = CBM-Kernal 

Bit 1=Adressbit Al3 Zeichen Eprom 4x4K 

Bit 0= Adressbit Al2 XXXXXX11 = ASCII8x8 
XXXXXX01 = ASCII 5x7 
XXXXXX10 = DIN 8x8 
XXXXXX00 = DIN 5x7 

2. Adresse $DD42 = Portadresse für RAM-Bänke. 

Bei 320K und 512 KByte-Versionen sind nur die Bits 0-2 

verwendet worden, die restlichen Bits stehen dem An- 

wender frei zur Verfügung. 

Bit 2 = Adressbit A 18 für Dynamische RAM’s 

Bit 1 = Adressbit A 17 für Dynamische RAM’s 

Bit 0 = Adressbit A 16 für Dynamische RAM’s 

3. Adresse $ DD80-DDFF = 128 Byte RAM frei ver- 

wendbar. (nicht umschaltbar) 

4. Adresse $DC40-DCFF = 192 Byte RAM (je Seite) 

frei verwendbar. (umschaltbar bzw. wird bei Seitenum- 

schaltung mit umgeschaltet.) 

5. Adresse $D040-D3FF und $D440-D7FF ist der Be- 

reich des System-Monitors. Außerdem sind in diesem 

Bereich einige System-Routinen untergebracht. 


Tabelle 4: Tastaturbelegung beim deutschen Zeichensatz 


Ve EM. AR el Cru 
KU 2r IE HA NET 89 


ASCHE GER 
ee ee 


Die Belegung der Tasten in den Betriebssystemen Prolo- 
gic 1,2 u. im Original-System ist wie folgt: 


Modus: Groß/Grafik Ö=Pfund-Zeichen 
Ü=Ü 
ß =Pfeil nach oben 
Modus: Groß/Kleinschrift ö = Pfund-Zeichen 
ä=ä 
ü=ü 
ß =Pfeil nach oben 
Ä=+ 
Ü=-— 


der Commodore-Taste C= 
möglich. 

F-2 startet den BMS-Ma- 
schinenmonitor. 

F-3 startet ein BASIC-Pro- 
gramm äla RUN. 

F-4 Schaltet die Funktions- 
tastenbelegung aus. 

F-5 LOAD 

F-6 SAVE 

F-7 liest ein Directory ohne 
Programmverlust. 

F-8 ändert die Floppy- 
Device-Nummer. 


BASIC- 
Hilfsfunktionen 


! + RETURN entspricht ei- 
nem OLD-Befehl. Verse- 
hentlich gelöschte BASIC- 
Programme (mittels NEW 
oder RESET) können so ge- 
rettet werden. 

$ Kennung für Hex-Eingabe 
(Beispiel A=$BD7F). 

% Kennung für Binäreinga- 
be (Beispiel A= %00101110). 
CTRL + V löscht die Zeile 
rechts vom Cursor. 

CTRL + U löscht die ge- 
samte Zeile, in der sich der 
Cursor befindet, der Rest 
vom Listing wird aufge- 
rückt. 

CTRL + DEL fügt im 
Listing eine Leerzeile ein. 
CTRL + Home bringt den 
Cursor in die linke untere 
Bildschirmecke. 


Erweiterte 
DOS-Befehle 


Vom C64 lassen sich DOS- 
Befehle nur umständlich 
eingeben. Mit dem BMS- 
System geht’s einfacher, wie 
Tabelle 5 zeigt. 


Hardcopy- 
Routinen 


Im System sind vier Hard- 
copy-Routinen integriert, 
die durch folgende Tasten- 
kombinationen aufgerufen 


CTRL + RUN/STOP + F-1 
= Hardcopy 1:1 Normal 


CTRL + RUN/STOP + F-3 
= Hardcopy 1:2 Normal 


CTRL + RUN/STOP + F-5 
= Hardcopy 1:1 Revers 


CTRL + RUN/STOP + F-7 
= Hardcopy 1:2 Revers 


Durch Aufruf einer Hard- 
copy-Routine kann jederzeit 
eine echte Hardcopy des ak- 
tuellen Bildschirms auf ei- 
nem Epson oder kompati- 
blen Matrixdrucker ausgege- 
ben werden. Die Lage des 
Bildschirms im RAM wird 
automatisch ausfindig ge- 
macht. Voraussetzung für 
die Hardcopys ist ein 
Druckerinterface. Bei Ver- 
wendung eines Epson-kom- 
patiblen Göfrlitz-Interface 
gibt es keine Schwierigkei- 
ten. Beim Wieseman-Inter- 
face muß erst wie folgt in- 
itialisiert werden: 

OPEN 1,4,1:PRINT 
1:OPEN 2,4,3:PRINT 
2:CLOSE 1:CLOSE 2 

Das BMS-System verfügt 
über einen Centronics-kom- 
patiblen Druckerport, der 
beim C64 am Userport reali- 
siert wird. Zum Betrieb ei- 
nes Epson oder kompatiblen 
Druckers wird ein spezielles 
Kabel benötigt, dessen An- 
fertigung in Tabelle 1 be- 
schrieben ist. 


Das BMS- 
Auswahlmenü 


Im BMS-System ist ein er- 
weitertes Einschaltmenü in- 
tegriert. Man erreicht es 
durch Halten der SPACE- 
Taste und gleichzeitigem 
Durchführen eines Hard- 
ware-RESET:s. 

Im Einschaltmenü (Bild 2) 
können folgende Funktio- 
nen angewählt werden: 

— Starten eines in den 
System-Eproms installierten 
Programms, 

— normaler BASIC-Start, 


— Einschalten eines Mo-> 
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werden: 


ee 


Ce /manomn 


Tabelle 5: DOS-Befehle 


duls im Expansionport, 
— Aufruf des BMS-Ma- 


schinenmonitors. : 
@R:NEUER= ALTERNAME gibt einem Progr. einen neuen Namen. 
@S: NAME löscht das Progr. auf der Diskette. 
Bar Be es; @l: initialisiert die Disk. 
m @V aufräumen der Diskette. 
monitor @N: NAME, ID Formatierung in 25 sec. 
Tabelle 2 gibt eine Übersicht @$ ODER @* Directory ausgeben. 
der ee @T: NAME das Progr. wird mit einem Schreibschutz versehen. 
Wenn das Progr. schon geschützt war, wird es wieder 
freigegeben. 
 eenns @9 die weiteren Befehle beziehen sich auf die Gerätenum- 
mer 9. 
son 20-KByte- @8 schaltet Gerät um auf 8. 
R @ liest den Fehlerkanal aus. 


Für den Assembler-Pro- 
grammierer bietet das BMS- 
System ein Fülle von Mög- 
lichkeiten. Alte Programme 
lassen sich leicht modifizie- 


In Tabelle 3 sind alle Adres- 
sen aufgeführt, die zum 


RAM-Bausteinen) einbaut. 
Außerdem gibt’s Tips und 


leitung komplett. Im näch- 
sten Heft wird beschrieben, 


ren, Speicherplatzprobleme 
gehören der Vergangenheit 
an. 


Steuern der RAM-Erweite- 
rung nötig sind. 
Damit ist die BMS-Bauan- 


wie man das BMS-System in 
C64 mit anderen Platinen 
(zum Beispiel mit nur zwei 


0801 Qe,08,e8,fd,9e,32,30,36, 57 0983 c3,14,d8,f1,25,ac,ba,c&, 07 Ob11 
0805 34,20,53,43,00,00,00,78, ac 0991 2e,35,cc,11,58,c4,12,2a, di 0b19 
0811 a2,ff,9a,a0,00,84,01,a2, 79 0939 45,69,81,de,ec,96,da,f2, bd- 0b21 
0819 cc,bd,57,08,94,33,03,b3, ı2 09a1 53,7Ff,e2,16,17,50,52,66, 53 Ob23 
0821 1d,09,39,FF,00,ca,d®,02, b3 0929 b8,15,27,2F,3e,93,cb,19, F7 0b31 
0823 a2,01,88,d0,ec,c6,2e,a5, 08 0Sb1 1c,26,e1,eb,1e,23,31,4f, c9 0633 
0831 2e,c9,08,f0,0d,ce,3d,08, f4 09b3 1a,9a,ce,d9,df,e7,21,3F, 50 Ob41 
0839 b1,2d,39,Ff,Ff,88,d0,f8, 6c 09c1 65,87,8F,1d,42,44,8c,b5, 25 Ob43 
0841 FO,eb,84,fB,a0,63,a9,cd, aa 03c9 c7,cd,e3,39,46,cf,2b,3b, ®b @b51 
0843 85,F9,a9,80,a2,44,85,2d, 6c 03d1 59,8b,94,af,b4,1f,41,63, 26 0653 
0851 a2,38,86,28,4c,34,03,a2, 35  09d9 64,6F,83,a3,37,30,3d,92, 7b 0b61 
0853 20,86, Fe,da,F®,20,38,3c, 31 03e1 bb,c5,32,4d,b7,1b,43,4e, Bc 0b63 
0861 a2,06,0a,f0,2b,26,fe,ca, ef 0963 S6,7c,82,a1,bc,34,36,51, 28 0671 
0863 dO,FB,a6,fe,48,bd,07,01, 12 @sfı Sb,67,79,db,54,61,62,9e, Ha 0673 
0871 84,01,08,68,ee,4e,03,dO, Ff 03F3 33,b3,70,89,35,5d,71,b2, F£ ObB1 
0873 de,ee,4f,03,d0,d9,bi1,f8, ec Ba®l bf,47,74,7e,57,5c0,6a,5e, 65 0b83 
0881 2a,c8,dd,da,s6,f9,d0,d6, 3f 0a03 72,77,7d,37,4b,5e,5f,a7, 86 0691 
0889 a9,37,85,01,58,4c,10,08, 89 @ali ab,6d,73,76,7a,3b,3f,be, fb 0b33 
0831 b1,f8,28,c8,d®,cf,e6,f9, 09 0219 55,58,9c,b6,4Ff,d1,e9,b9, Bf Obal 
0899 d2d,cb,F®,ec,2da,f®,15,b2, 89 Da2ı d3,6F,af,b9,4e,49,8c,63, 88 @baS 
0Bal 2b,a2,03,0a,f0,1a,26,fe, 80 Oe23 18,c9,dc,df,83,07,ca,b3, df Obbi 
0Ba9 ca,dd,FB,a6,fe,48,bd,ff, bf 0a31 d4,d3,61,fd,86,25,bc,28, 5a Obb3 
O8b1 90,4c,4d,03,b1,F8,2a,c8, la 0233 SF,1F,bd,20,a5,86,0F,95, b5 Obci 
0863 d®,e5,86,Ff9,dd,e1,fd,c8, ef Da41 64,31,40,8b,2c,b0,19,04, 5a @bc3 
@8c1 b1,fB,22,c8,d0,ed,e6,f3, f3 0a49 a9,a5,80,33,e1,a1,09,59, ®1 Obdı 
08c3 d®,dc,f®,bc,®a,f0,15,b®, a8 Qa51 Of,04,04,55,bd,92,c3,29, 7F Obds 
08d1 38,22,06,0a,f@,1a,26,fe, 30 0253 96,72,68,F9,44,87,16,1b, “4c Obel 
0849 ca,d®,F8,a6,fe,48,bd,47, 77  @a61 a4,58,d1,46,a5,10,di,cf, 6c Obe3 
O8e1 91,4c,4d,03,b1,f8,2a,c8, 1b 0263 77,20,6Ff,28,96,59,c9,83, f4 Obr1 
0889 d®,e5,06,F9,d®d,e1,F0,38, 1F 0871 c3,77,8f,c7,eb,e7,£7,95, 79 Obes 
OBF1 b1,F8,28,c8,d0,e0,e6,f3, f3 0373 67,8F,c7,42,48,8F,0b,72, af 0-01 
OBF3 dd,dc,f®,8c,b1,f8,2a,c8, 73 0a61 51,0d,04,Ffb,b2,c1,f2,ac, 84 0003 
0301 d®,0c,e6,f9,d0,08,4c,65, Sf 0a89 19,8F,fa,c2,b3,c7,54,5d, a5 Oc11 
09309 03,a2,07,0a,f0,ee,26,fe, 83 0s31 df,48,29,61,eb,36,76,39b, 89 0c19 
0311 ca,dO,f8,a6,fe,48,bd,87, 37 0233 a4,76,28,F8,fd,de,3e,5a, 31 Oc21 
2319 01,4c,4d,03,20,d0,7b,a9, 22  ®aal c3,190,59,5e,1b,Bf,71,0d, 9e 0c23 
0321 4c,5b,00,85,f0,02,a5,c9, 26  ®aa9 10,e9,e4,68,3d,30,7b,b9, 64 0031 
0923 01,60,05,03,.0,8d,dd,ff, 94 Gabi 63,79,44,b2,ce,4d,if,3F, dd 0033 
0331 10,a2,2d,30,06,08,68,48, aa ®ab9 bo,ab,3c,7e,3Ff,5f,3F,be, 33 Oc41 
0339 87,18,04,0d,e6,d3,dc,ca, @b Gacı 7e,32,13,35,c8,5b,32,88, 38 0c43 
0341 Fe,fb,29,30,09,86,d6,24, 31 ®ac9 68,fe,82,92,31,bd,03,ca, 68 | 0651 
0949 ed,b®,a4,2c,di1,a6,dS,8e, 26 Badı Ba,30,d1,3d,4c,ea,43,44, 4f 0053 
0951 e0,0a,fd,40,84,c8,d2,ee, 31 BadS 1c,43,fe,1d,13,ab,24,1b, 2b Oc61 
09359 e8,f7,ea,f3,b1,c6,88,bd, Se Dael c5,d4,5f,e8,62,80,bF,bi, 58 0063 
0361 F5,0F,2d,d4,e4,b9,c0,d7, 52  @aeS F8,30,60,2b,2c,5d,0Ff,3b, ac 8c71 
0369 F8,75,89,ef,F6,fc,0c,31, F2  dafı 08,90,F6,1b,70,78,8b,02, d4 0073 
0971 399,8a,c1,25,33,88,ae,28, 2b u ®af9 4c,a3,eb,ca,b1,37,e3,f4, 32 ©c81 
0373 38,3d,0e,f4,22,38,F9,aa, Bf 0b21 08,33,4a,84,45,fe,e3,61, Sc 0c83 
0381 13,78,fa,0b,49,6c,a8,4a, cH 0b29 S8,15,ba,7e,8F,4d,ce,9b, f3 0c31 


Tricks für Anwender und 
Programmierer. 
O 


7d,7d,ca,72,40,63,18,c6, 83 
48,8d,c9,3c,49,06,f2,ac, d6 
65,81,47,07,e4,61,8c,cb, a8 
b1,05,56,43,a3,97,24,87, 68 
99,02,94,a2,8c,34,4f,53, de 
3a,39,d1,24,39,9c,2e8,cd, 55 
30,Ffc,f1,4f,17,05,d8,68, 98 
58,09,38,6b,98,0Ff,47,14, d8 
a9,86,74,00,7e,6c,5c,4f, Ba 
41,4b,dP,ba,14,7d,84,48, e7 
58,ec,3f,a7,31,71,de,ac, 28 
66,3b,50,11,af,Ff9,4a,51, 19 
10,63,2d,0a,45,fc,48,71, di 
03,18,6b,92,2Ff,e2,1f,77, ba 
95,85,11,66,dc,46,02,24, Of 
36,02,80,bc,5d,91,1c,8c, 55 
04,44, 2e,f9,7d,bc,bd,54, 20 
04,46,04,24,5f,22,48,be, 65 
4y4,a7,55,cc,55,11,4d,32, 86 
35,23,b8,95,d3,65,60,a1, 5b 
26,06,d6,87,95,c5,24,9c, ®8 
14,26,e1,28,8F,6d,ea,09, a9 
44,Bd,aa,f6,ae,25,49,5c, ei 
Ya,4c,bd,b9,25,49,c9,2a, 7d 
7c,78,7c,85,23,53,09,49, 26 
9b,d5,21,d6,9F,19,33,79, 52 
08,a2,c7,c5,a2,68,25,24, at 
99,f2,ad,85,db,c2,e9,“4e, 7a 
e7,28,ed,9c,e5,c4,a3,b3, 208 
93,b2,4a,3b,69,39,5e,1c, 62 
13,24,ab,c2,8d,“4a,4d,S0, d8 
06,4d,c8,04,aF,60,64,1e, 11 
c5,84,36,1a,30,95,12,c8, 42 
e8,c7,9b,2f,5c,7a,bd,30, fb 
fd,1a,7e,4a,2a,a8,1d,3a, 7c 
d®d,aa,9e,80,f6,1c,d0,8d, 68 
7d,13,0e,24,09,90,e6,40, 73 
43,69, fb,63,ef,b4,65,d9, 38 
37,20,87,60,1d,38,c3,30, b4 
23,56,84,68,60,8d,5b,9c, 79 
7a,b®,aa,d3,84,05,d3,04, 2f 
69,d2,3a,46,91,d6,d4,al, 7® 
c4,f9,b0,b6,63,ad,59,02, da 
2d,2c,01,61,5b,35,78,09, 3c 
69,b5,07,43,b2,89,a4,42, 03 
95,a4,6b,4a,05,85,69,b1, “4b 
91,b2,23,01,95,8e,38,cd, 7a 
23,6c,54,b9,63,88,808,1c, 14 
1a,cd,ed,70,b2,c3,a8,907, 5a 


0c39 
Ocal 
8ca9 
®cb1 
8cb3 
Bce1 
8cc9 
Bcdi 
Ocd9 
®cei 
Oce3 
Ocfi 
Ocf9 
0491 
0483 
Od11 

, 2d19 
Od21 
84239 
0431 
0439 
Od41 
0d43 
0451 
0459 
Od6s1 
0469 

= 0471 
' 0d79 
Od81 
0489 
0dS1 
0499 
Odal 
OdaS 
Odbi 
Odb3 
Odci 
8dc9 
Oddi 
Odd3 
ddel 
Ode9 

= 8dfı 
= 2dfs 
 deBd1 
de23 
Bell 
 de139 
BE Be21 
 de23 
de31 
0833 
— deH4i 
0e43 

2 0851 
8859 
" Be61 
0669 
I de7i1 
0873 
 de81 
0883 
8831 
0833 
deal 
Bea 
debi 
BdebS 
 deci 
' Bec9 
Bedi 
ded3 
Beel 
Ose3 
= Befi 
' def9 
oFo1 

m eros 
 orıı 
= erı3 
ı of21 
or23 

‚ of31 
039 
oF41 
oF49 
orsı 


86,b4,c6,92,92,66,9a,34, 
02,66,91,af,2c,e9,31,®e, 
88,9d,ae,21,d8,d9,cc,f4, 
43,b0,c0,72,be,02,54,7a, 
47,64,81,61,08,0d,11,e4, 
35,1c,19,3b,de,4d,87,28, 
75,08,09,01,76,84,84,90, 
d2,c9,2b,63,c5,3b,24,96, 
1b,e®d,1c,4f,8d,27,3a,02, 
45,df,a2,1f,83,55,26,d4, 
50,99,28,75,03,06,43,50, 
c0,dc,61,27,44,63,11,86, 
89,c7,a0,7b,c5,e2,db,5®, 
14,8d,93,ab,d5,bd, 30,34, 
38,85,190,49,1d,a2,9d,32, 
“d,b4,71,e4,19,cb,bf,cH, 
37,53,70,23,92,0F,c5,17, 
8b,81,c1,c7,c5,f0,38,d5, 
89,1b,e2,6f,8Ff,8b,e7,62, 
c7,20,08,35,64,05,58,15, 
30,d5,1c,c2,2d,53,43,31, 
fe,c2,62,e2,e6,52,f8,ac, 
5c,20,b3,2d,F9,5d,8e,15, 
c7,180,ec,30,cc,b4,5f,ad, 
18,05,a5,55,a5,73,af,06, 
d1,1d,c9,84,d3,9d,82,85, 
S4,8f,52,68,e8,a0,46,ad, 
82,27,1Ff,17,F3,9a,ac,98, 
95,60,2a,4b,56,05,d5,Ba, 
28,2b,88,ba,7e,c0,a9,ed, 
19,74,31,cf,f6,20,9b,90, 
67,5c,82,1b,bd,03,92,03, 
1F,39,b5,b4,14,b1,db,81, 
c8,3a,50,74,4f,9c0,71,0e, 
d5,6b,43,ca,Ba,85,64,a5, 
99,2da,e6,cb,e3,fe,30,a0, 
30,49,b0,20,7F,F8,dd,6Ge, 
05,14,5d,d0,3b,7Ff,cB,ef, 
7F,86,b9,5b,18,48,97,56, 
80,86,80,3e,e1,2a,3d,ci, 
d6,3a,25,98,73,4b,e3,72, 
890,c1,8e8,07,37,fa,2e,eB, 
15,3F,c3,02,1b,3F,50,56, 
2e,86,0d,84,4c,5b,1b,83, 
06,05,c8,b4,a9,45,0d,32, 
86,25,00,33,1a,82,087,0d, 
a5,28,28,6c,dc,61,28,21, 
b6,35,5c,48,990,b9,5f,48, 
30,e3,2d,b5,b5,b9,Ff5,di, 
13,12,76,88,ed,b3,5d,0®d, 
ef,a0,24,4c,89,0c,74,84, 
40,85,c05,c9,12,1c,55,£5, 
d9,12,0c,b2,eb,2d,2a,56, 
3a,44,84,4d,c5,0b,a5,2e, 
43,88,be,71,57,32,1d,19, 
12,1b,b5,b4,36,f1,3e,27, 
S5,db,cb,®e,1c,61,43,54, 
c6,14,35,49,57,32,18,6e9, 
12,d7,cb,d9,06,52,03,62, 
8a,9c,99,dd,b3,d2,64,49, 
3c,96,79,bb,46,48,F7,22, 
43,08,c2,35,ae,34,89,52, 
8c,c6,c3,dc,9f,14,34,d1, 
53,80,52,82,20,16,51,54, 
a0,07,d®0,40,02,94,18,01, 
f4,09,60,390,c0,4e,23,ec, 
16,dd,62,96,18,2d,b7,ec, 
00,bc,5b,54,d1,13,d9,6d, 
03,18,52,25,61,75,6d,b3, 
95.04.b9.b7.85,.78.2b.6d, 
61,52,d2,20,20,90,5c,ed, 
eb,68,08,56,16,8e,57,b9, 
12,56,ce,be,b9,12,4f,ad, 
5a,79,12,25,61,70,2d,aa, 
4b,25,89,9d,25,9e,d6,eb, 
b5,cc,f3,77,22,dc,38,c2, 
b6,dd,985,2d,23,22,09,05, 
b8B,df,6d,cd,2c,04,2c,64, 
17,3b,7c,8b,2a,44,a6,26, 
7a,d9,b6,3c,af,72,1c,65, 
b3,12,eb,b6,d2,14,5a,d9, 
e9,12,59,ee,2a,d6,89,83, 
6b,96,cd,db,5d,23,33,08, 
b9,ca,3b,69,a2,e4,42,c6, 
41,68,33,21,22,53,1e,66, 
35,05,de,54,85,ca,1d,O®b, 
S2,43,6c,cf,4f,46,37,6e, 
bb,3b,e9,38e,91,e1,02,c2, 


G@| HARDWARE 


oFs3 
orF6sı 
of63 
or71 
8F73 
oFB1 
of83 
orsı 
ors3 
Ofal 
ofas 
OFfbı1 


' ®fb9 
ı ofci 


BFfc9 
ofdi 
ofds 
dfel 
ofeS 
orfı 
orfs 
19001 


1903 


1911 
1019 
1021 


 1eas 


1031 


‚ 1039 


1041 


' 19049 


1051 
1059 
1061 
1069 
1071 
19079 
19081 
1083 
1031 
19039 
19a1 
10a3 
10b1 
10b9 
12c1 
10c9 
10d1 
190d9 
10ei1 
10e3 
10F1 


. ı10F3 


1101 


‚ 11809 


1111 
1119 
1121 
1129 


a 1131 


1139 
1141 
1149 
1151 
1159 
1161 
1169 


1171 


1179 
1181 


1189 


1191 


B ııss 


1lal 
11a9 
11b1 
11b9 


I 11c1 


11c9 
11d1 
11d9 
ilei 


leg 


ı11f1 
119 
1201 
1209 
1211 


3e,f2,1c,64,66,c4,20,69, 
0b,94,3b,15,48,b1,c0,a5, 
33,21,22,38,23.48.95,28. 
40,36,81,73,21,ad,5b, 37, 
6d,14,84,68,b7,5b,3a,76, 
26,46,99,0c,£3,50,d7,33, 
d2,18,77,5f,5b,5c, 76,00, 
44,80,30,00,91,2b,21,88, 
d4,16,83,19,96 'Se,i1s, ce, 
e4,02,72,cf,02,53,ac,c2, 
cc,64,01,bf,43,14,85,95, 
38,04,4b,14,86,16,Ffa, 7c, 
Sb,FFf,83,58, 73,00,35, 38, 
38,1e,30,91,8a,40,0d ‚da, 
62,87,94,02,81 ‚Sa,io, bo, 
£7,ba,64,00,98,a4,45,01, 
32,d1,68,82,04,99,6a,87, 
60,ac,52,24,bd,d5,92,eS, 
31,58,28,0a4,b3,14,c2,14, 
00,57,ba, 02,02, c5,2c, 4a, 
a5,62,21,96,a8,51,11,84, 
17,05,59, 28,58, S5,92,bb, 
ei ‚4d,ee,34. 78,7b,32,d4, 
89,d3,65,10,f7,Ba,45,e2, 
02,69,bd, 9a ‚30.87, 75,00, 
15,df,4d,88,20,F7,23,36, 
97,57,24,2a,0b, 7c,ab, c8, 
95,72,d0,aa,e7,32,30,ab, 
40,65,15,cb,d8,c2,bd,32, 
03,28,ae,50,d0,12,86, 1a, 
96,05,58,73,20,46,0d,05S, 
73,5b,80,53, ae,07, 61,59, 
Sd,d2,a2,F6,19,a4,ee, 34. 
a8,73,e23,0a,4d,c6,95,47, 
40,4a,07,aa,88,9b,f5,ca, 
Be,7a,d1,a5,74,63,09,5c, 
ed,46,15,15,10,£7,25,78, 
a3,9f,90,77,40,22,86,F6, 
08,78,20,28,94,73,dc,ic, 
ad,e2,88,7a,70,7d,40,e2, 
85,47,38,8a,85,47 ‚s5,ec, 
57,35,d8, @4,ae,65, 6B,0b, 
9d,c9, Sc,ea,4a, 65,b7, Ya, 
a5,26,ec,aa,52,51.32.a4. 
2b,10,26,04,33,7d,af,53, 
3a,se,db,78,c2,b5,38,d2, 
a4,b0,56,a1,44,92,d6,5a, 
55,66,6d,6d,32,c8,b2,ai, 
da,56,44,a6,92,00,c9,66, 
83,39,a0,95,79,09,5e,e4, 
a3,2d,04,a4,93,6b,6a,05, 
25,56,73,05,68,49,a5,4e, 
97,fd,5c,59,aa,cf,7b,ed, 
e5,4c,1d, 8c,a®, 62,5b,d8, 
Sc,®c,4b,76,86,64,39c,d6, 
5a,3c,48,b1,b3,65,b2, bd, 
35,ae,s5. ac,21, d6,cd,84, 
69,f9,2a,f0,80,09,53,58. 
4a,9a,32,54,d4,12,86,89, 
6c,2a,72,28,d1,33,91,32, 
a9,ce,bb,2a,9c,59,d0,17, 
6a8,22,c0,94,d4,b2,71,84, 
a2,bd,58,39,13,37,£0,34, 
ab,52,84,64,00,95,14,7b, 
80,e2,85,67,97,ac,e8,12, 
b®,6f,de,4b,c8,29,28,b5, 
aB,28,56,de,S5b,2d,92,30, 
a4,f7,53,a8,ca,a0,96,d2, 
a3,4a,f1,3c,7d,e5,4e,ef, 
2a,aa,d6,3c0,9e,f2,87,2e, 
4a,5e,54,59,c9,60,c9,48, 
da,9d,f4,32,56,d6,a7,4c, 
0c,97,1a,d4,e6,14,32,5b, 
6b6,53,98,08,c9,e1,68,73, 
18,19,27,65,39,9F,0c,9c, 
36,93,54,25,41,4e,48,da, 
92,96,0c,e5,b5,a9,3F,43, 
39,c6,b5,26,60,67,36,d6, 
a4,b®,a1,9d,c2,d4,96,00, 
33,8f,68,4b,18,19,d8,6d, 
49,67,c03,39,58,19,2c,ed, 
aß,af ,42,44,cc,16,f3, 38, 
4e,19,9b,34,89,98,2d,66, 
51,b2,cc,89,5d,46,59,26, 
53,34,0e,19,90,24,89,94, 
7a,co. df,6f,42,d6,33, b4, 
91,32,8F,7c,15,1b6,87,41, 
ee,41,44,60,90,35,7a,8f, 


1219 
1221 
1229 
1231 
1239 
ı241 
1249 
1251 
1259 
1261 
1269 
1271 
1279 
1281 
1289 
1291 
1299 
1281 
1289 
12b1 
12b9 
12c1 
12c9 
12d1 
12d9 
12ei1 
1283 
12f1 
12F9 
1301 
1389 
1311 
1319 
1321 
1329 
1331 
1339 
1341 
1349 
1351 
1359 
1361 
1369 
1371 
1379 
1381 
1389 
1391 
1399 
13a1 
1339 
13b1 
13b9 
13c1 
13c9 
13d1 
13d9 
13e1 
1369 
13F1 
13£9 
1401 
1409 
1411 
1419 
1421 
1429 
1431 
1439 
1441 
1449 
1451 
1459 
1461 
1469 
1471 
1479 
1481 
1489 
1431 
1499 
14a 
14a9 
14b1 
14b9 
14c1 
14c9 
14d1 


7a,59,72,69,75,91,4b,9a, 
c9,64,b2,be,22,58,63,62, 
d8,c1,a1,11,5e,96,ac,Ba, 
52,83,62,2b,21,77,cb,03, 
03,fc,80,52,01,8b,83,b4, 
S1,dc,63,5c,b2,cb,80,88, 
90,65,9a,ce,7e,d5,9c,fFa, 
2b,39,f4,16,79,59,95,cf, 
19,bf,5a,30,25,77,da,b7, 
31,09,87,£7,40,38,f0,de, 
c2,93,03,3F,83,8c,cb,69, 
8c,c0,85,a1,30,d7,a0,9d, 
86,b1,f8,6c,89,d8,70,d7, 


4f,37,65,00,60,d8,fc,34, 


99,d8,7d,cd,bc,61,01,0c, 
83,cd,66,12,cd,96,97,40, 
“d,4a,ca,30,a6,fd,f7,be, 
d2,b4,16,86,21,13,a4,73, 
d®,70,98,78,69,38,15,87, 
cH,2b,f9,c6,94,a0,96,b9, 
78,aFf,20,88,a8,0b ‚22,58, 
15,58,27, Ba,a2, ad,ea,68c, 
7f,af,b2,99,ac,e9,61,da, 
94,b1,7c,34,d9,fc,6B. 3a, 
ca,f2,F7,62,4e,04,74,5b, 
4d,9d,75,980,68,92,F3, Da, 
da,01,03,93,1c,F9,91,c8, 
e7,a2,da,936,12,80,3d4,46, 
a5,54,53,a1,54,15,29,66, 
cb,79,a8 ‚61,87, e1,f2,93, 
9a ,c5,8c,07,cf.90,75.Be. 
d5,0d,7a,07,14,30,d7,b®, 
@2,c8,a8,16,fa,30,be,e3, 
bd,7d,3e8,81,75,5a,97,6s, 
ad,af,e®,40,b7,98,81,2b, 
27,89,9d,64,1b,c6,33,83, 
1f,eb,f1,c1,4b,10,15,5a, 
b1,fe,99,1c,09,5c,5c0,56, 
2c,38,6c,42,cf,0e,36,59, 
81,54,95,04,74,c4,26,45, 
6b,70,ec,89,1b,ad,50,98, 
7a,ac,86,33,e3,9f,06,c2, 
a2,d8,75,8d,c1,42,4f,2e, 
fe,ab,c2,dc,c8,47,3d, 77, 
71,dd,a0,24,989,d8,di ‚Sa, 
9c,d3,66,6a,b1, fe,s8, Sc, 
85,10,e0,1b,b0,9a,72.28. 
08,07,89,48,88,0d,40,32, 
11,50,c6,c0,59,06,24,61, 
06,a1,6b,f4,a5,55,e6,7b, 
31,5b,a7,8e,F4,c8,3d,3a, 
71,21,94,05,46,05,6d,94, 
42,e8,52,5a,24,f1,de,99, 
1a,9a,6a,f1,41,2b,23,50, 
c6,cE, 85, di, &c, 8c,28,b2, 
98,78,60,8c,0c,fB,ff,5f, 
5B,4e,aa, 18,77, 91,58,eb, 
06,bd,2b,d®,43,1c,61,ce, 
35,31,d9,a8,b4,af,25,aa, 
ac,d6,67,66,82,d7,16,33, 
34,76,68,28,d1,52,5c,66, 
62,73,6c,cc,40, Be.3S, 36, 
71,84,ec,d4.5a,70.80,74. 
c8,cc,70,81,8c,20,b3,a5, 
a0,938,63,59,18,4c,8d,56, 
71,9a,3b,23,4a,2c0,25,45, 
e4,11,d9,ac,Ba,42,di,ab, 
b7,6c,66,68,ec,88,cc, 74, 
c4,52,70,93,15,56,b4,4e, 
S8,9f,06,c3,23,4a,2a,47, 
78,26,51,ad,96,24,4d,ei, 
62,28,02,0a,46,b2,cd,ci, 
db,Se,ad,7a,a8,59,72,d®, 
ac,04,b9,c9,e9,47,89,39, 
35,df,01,48,f1,cb,85,12, 
4a,7a,56,08,27,89,fd,84, 
2a,6a,57,F4,14,61,12,1F, 
£5,35,8a,02,c7,45,3c,f3, 
16,c5,f2,a9,9a,72,0d,63, 
85,46,41,85,4a,76,3d,1a, 
7a,9b,59,ca,89,bf,6c0,1e, 
2Ba,7e,d9,cc,54,c8,a2,0d, 
b9,88,0d,0b,72,a6,39,931, 
al,2f,bd,8d,a5,01,68,7a, 
63,0b,db,dd,al,bf,80,27, 
3b,42,f2,30,93,1a,19,c8, 
c2,60,f4,3d,51,84,91,d®, 
ce,15,02,82,41,93,78,7d, 


EP RT EIN SAL EDV TBUHE LIND 


Oktober/87 um 115 


b6,98,a81,90,2a,d8,a7,a9, 
48,£9,69,1f,c3,9e,89,2b, 
37,48,17,88,70,b2,d3,8b, 
8a1,17,50,48,9d,08,cd,a2, 
e4,36,4f,89,£f1,23,bc,11, 
f2,86,36,7b,42,af,68,9e, 
2d,2a,ba,82,d1,4c,6e,9f, 
ef,bb,44,eB,e8,e7,b4,4d, 
16,86,96,68,9d4,8d4,09,ad, 
a2,73,b4,26,aa,0b,55,31, 
a3,79,32,9b,45,c9,2d,44, 
Sf,e3,Be,6f,25,46,d1,36, 
10,95,15,04,83,a6, 36,40, 
Be,f®,41,94,23,b3,4c,6d, 
09,1d,e0,21,66,4b,4te,Be, 
bd,a6,06,88,82,c3,67,43, 
b4,64,3b,4e,07,1b,41,13, 
Sf,ci,bf,fc,3f,50,28,02, 
12,ec,88,1d,080,68,51,e3, 
c7,26,24,19,86,d7,06,Be, 
a1,54,16,F0,81,cd,d®,e7, 
ba,65,b2,dc,d7,17,26,3e, 
a0,80,c9,f2,ba,54,ad,bB, 
36,26,27,a6,fd,b2,ea,S5, 
09,22,08,06,dc,17,3a,dc, 
14,65,b8,38,86,25,ed,cc, 
ec,a6,9b,18,11,79,6®8,be, 
95,34,4b,73,3e,4d,ad,ec, 
di,21,df,dd,b4,a8,88,b4, 
di1,b4,86,b7,43,54,01,b5, 
e5,09,56,07,86,cb,66,58, 
48,20,30,3a,10,52,9e,b2, 
d93,68,a3,09,91,03,6b,ca, 
92,68,92,0a,5c,08,00,7a, 
2c,a8,4a,75,58,14,70,cd, 
36,08,36,68,f6,68,8b,76, 
d2,380,ba,cS,ic,c4,b2,ba, 
0a,b1,Ba,82,ac,b7,85,67, 
3d,2Ff,15,68,cf,698,18,1c, 
f0,d5,85,65,45,40,4b,1b, 
2d,793,498,98,b3,35,ba,le, 
30,36,bc,80,ca,68,31,2c, 
99,73,7F,60,4a,98,88,39, 
87,82,ae,77,28,87,47,13, 
d7,20,39,7F,dc,22,83,74, 
a3,80,c5,f2,25,80,c2,48, 
40,e2,15,b8,cc,74,71,d5, 
67,52,1d,62,74,85,96,2a, 
30,0,33,30,FF,06,b2,di, 
20,74,84,3b,£f3,F2,43,48, 
65,41,a1,98,73,b5,78,895, 
67,52,42,47,64,63,54,9b, 
58,d5,23,38,8e,3a,3a,12, 
91,90,55,9d4,57,41,1c0,c6, 
aa,a1,23,99,c6,ac,eB,e9, 
ea,4b,Ba,bc,ae,e4,fa,f2, 
52,71,08,88,b3,69,b2,a2, 
2b,01,5d,5c,8c,2e,fa,b, 
a3,5a,58,92,52,71,80,d2, 
59,02,a2,c8,39,84,09,a0, 
cf,60,01,5b,44,F7,40,Be, 
£fd,9b,0a,40,a1,27,15,ab, 
Ob,ba,0Ff,ba,02,86,05,6d, 
15,67,78,88,ce,29,0de,a4, 
4c,b3,8b,13,ac,41,ce,c8, 
1d,fb,20,ad,a3,2b,0c,05, 
d5,30,4a,b3,99,ab,®b,3f, 
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64,0d4,5e,89,ec,f8,15,f6, 
74,65,61,63,c1,cc,33,ec, 
Y8,49,c4,5b,28,51,d0,23, 
82,44,90,5F,d0,1b,04,6d, 
43,89,20,54,20,15,1a,27, 
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17,F2,58,0F,6e,d3,9d,88, 
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6b,59,c4,4d,81,4e,26,8B6, 
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68,03,99,a2,75,e8,8d,sa, 
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56,64,53,3b,d0,50,90,9a, 
b4,5a,38,94,10,60,7a,74, 
32,ef,09,58,ca,54,ac,35, 
78,23,33,c8,48,9e,41,83, 
86,88,09,£8,77,80,60,c1, 
46,1e,70,a3,f3,d8,48,69, 
Ge,62,e21,6e,74,a4,25,4c, 
82,cc,6d,2a,5a,1a,'42,7e, 
08,65e,ee,58,f0,db,28,b5, 
62,85,22,cd,82,d1,a0d,a9, 
b4,63,b5,6a2,0a,92,b5,57, 
6c,3d,e2,8e,a9,f2,cd,36, 
36,9e,fc,44,de,b8,50,50, 
18,20,44,8b,8d,37,99,1c, 
0a,8d,40,99,aa,1e,78,00, 
86,90,80,c6,43,61,80,55, 
84,d3,38,12,28,97,34,b9, 
43,60,66,3b,4f,d9,99,2e, 
1c,44,4c0,6a8,51,2d,fe,SS5, 
7c,87,c9,8c,26,67,46,36, 
Se,fe,30,24,f5,20,b3,c®, 
45,20,98,68,0a,f1,d4,5d, 
22,88,7c,4b,a6,ae,80,88, 
ea,63,1b,62,09,3a,89,3f, 
17,06,9c,69,13,a9,80,b6, 
43,76,£7,40,43,31,d4,c®, 
54,6a,00,d3,8f,aa,09,21, 
03,F0,d9,84,13,0d,01,86, 
3a,41,74,0c,97,48e,a0,33, 
ba,9b,d5,24,05,95,f4,ba, 
dd, 21,44,56,12,10,92,01, 
69,Be,c4,58,62,21,31,®a, 
09,60,92,b7,68,63,09,51, 
a8,8c,4f,2e,dd,a7,33,bc, 
a9,ce,c3,cb,3c,8d,59,d8, 
190,d3,46,93,78,40,98,dS, 
35,3c,ca,ei,4a,e1,57,4d, 
36,16,af,04,30,75,24,b3, 
b0,57,4a,22,a0,25,c0,ba, 
76,98, f2,f6,1a,bc,3f,47, 
1d,bd,65,43,81,74,80,15, 
af,d®,04,d7,28,4d,3c,3a, 
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2a,09,29,a8,28,41,e7,95, 
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2189 
2191 
2199 
2lal 
21a9 
21b1 
21b9 
2lci1 
21c9 


ı 21d1 


21d9 


= 2leı 
= 21e3 
E 2ıF1 


e1f3 


= 2201 


2203 
2211 
2219 
2221 
22293 
2231 
2239 
2241 
2249 
2251 
2253 
2261 
2263 
2271 
2279 
2281 
2289 


ı 2291 


d2,930,d9,18,29,84,11,82, 
c8,4d,a8,76,80,75,68,34, 
6b,30,72,97,68,67,c8,a7, 
69,81,34,e0,76,50,70,55, 
60,68,90,70,91,c8,87,3a, 
30,39,a90,d1,09,18,c2,44, 
22,3d,15,68,90,5b,ab,4a, 
8d,42,2c,2a,4e,52,89,B1, 
Sf,b2,14,47,75,2d,01,21, 
fa,33,85,d3,88,12,d0,dd, 
18,c2,91,ac,41,ad,d6,f4, 
04,d4,cb,86,08,09,a8,78, 
e8,27,3e8,3b,65,8b,14,0d, 
15,89,29,e0,39,08,3c,b4, 
S9,83,15,67,41,cf,62,d3, 
77,57,05,5b,cb,2c,3c,7®, 
12,f0,c0,1c,00,8d,aa,18, 
03,f6,ac,50,68,41,a1,6b, 
6d,92,68,80,8d,a8,1a,1®, 
75,cd,11,29,16,1d,f9,ea, 
88,69,02,37,be,a4,e7,c1, 
Sa,d1,87,33,2b,01,14,e9, 
09,06,02,ca,cf,84,70,1b, 
14,1f,12,34,56,64,bc,b®, 
6c,79,838,06,16,09,27,f2, 
66,30,d0,12,78,6a,61,38B, 
67,98,01,78,566,1e,b8,c2, 
6f,d9,37,0d,40,e8,32,6c, 
13,30,ed,a7,c5,21,98,41, 
a5,84,07,35,69,f1,60,9a, 
f1,c8,bf,b2,eb,8a,27,36, 
fb,1c,b2,2a,3f,44,61,27, 
58,26,69,38,28,9e,ed,dd, 
43,c4,63,98,74,50,99,84, 
7d,81,05,8e,fd,b4,57,2c, 
22,61,5c,87,b9,28,71,b7, 
27,88,b0,27,86,49,88,Ba, 
dce,b8,6d,cc,17,14,db,i1e, 
16,40,5b,13,2c0,80,98,88, 
a8,2b,06,04,50,71,4c,e5, 
19,b9,a8,c4,30,6c,41,98, 
33,37,2b,9d,94,a8,89,88, 
d8,ed,60,13,07,55,b9,6®, 
dd,f6,0d,83,33,86,dc,ec, 
7b,63,09,83,32,16,b3,06, 
dc,99,28,81,50,37,54,2Da, 
14,e2,c8,72,d4,89,a4,72, 
31,1d,2d,19,2d,48,b9,d9, 
9a2,88,91,db,27,680,12,31, 
99,52,23,16,08,c4,64,b4, 
62,93,60,83,09,19,2d,®b, 
59,18,a4,96,d2,31,2c,4b, 
3a,c4,b1,2c,eb,63,22,a2, 
05,84,be,8c,34,c4,89,99, 
24,61,aa,fa,98,a7,90,d8, 
re 
37,d1,83,65,2a,06,8b,24, 
8c,53,55,40,a4,d9,24,62, 
93,94,49,d3,64,91,8a,66, 
31,903,49,92,46,29,99,0f, 
53,19,76,3b,7d,81,7d,9a, 
80,380,c39,31,cf,43,8a,2e, 
ec,33,1c,e9,15,f5,5a,28, 
1c,2a,6b,47,0d,78,d9,3a, 
Of ,ac,83,70,bb,c3,70,66, 
1d,12,37,50,£7,3c,68,45, 
dd,f4,14,d5,84,4d,8b,30, 
31,30,ef,85,0Ff,36,88,15, 
52,c7,b6,6b,93,21,be,97, 
b4,02,e0,28,91,cc,3e,ei, 
a2,66,9a,45,f8,29,a5,51, 
7c,83,47,c0,2b,d®,b4,60, 
9c,36,c08,88,55,59,Be,e2, 
03,eb,91,89,d1,87,ea,7c, 
78,7f,55,01,5c,e4,42,89, 
55,63,b6,81,dd,28,86,89, 
4e,60,66,8d,6a,d8,3a,2a, 
d7,45,ae,5a,db,89,f2,13, 
88,77,58,0b,c6,11,01,5c, 
ab,19,0e,e®,1a,cd,8d,36, 
42,d2,02,05,55,15,Be,s3, 
18,56,db,c1,bc,90,49,aa, 
80,ec,a®,1d,88,c2,22,4d, 
54,07,28,23,09,a4,6f,3c, 
3b6,47,73,73,3b6,50,53,21, 
83,61,e4,3b,b5,99,84,02, 
4d,55,89,da,cc,£f2,55,5a, 
c6,3f,13,89,dd,ae,@f,20, 
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1c,d6,10,6F,2c,83,79,73, 
42,80,82,99,76,1a,17,c0, 
d4,92,7e8,1a,83,01,aa,72, 
2f,b7,01,00,3b,cb,c2,98, 
e8d,c8,c8,ad,e1,30,77,49, 
7c,88,2b,69,22,8F,84,c1, 
db,3e,38,13,07,67,08,d3, 
6c,1b,53,80,43,50,14,399, 
1b,80,93,55,8d,bb,31,b®, 
0e,6b,09,a5,90,84,89,1d, 
9c,c2,e9,69,6c,e1,36,87, 
6c,f®,b6,88,06,22,30,9d, 
13,ba,c3,48,9d,d1,02,0d, 
84,93,d6,c8,31,3F,b7,90, 
e2,06,27,04,a6,16,00,8d, 
Se,S4,d8,60,cd,64,08,dc, 
66,07,29,79,78,45,03,53, 
ef,2a,fa,28,27,20,32,da, 
Ba,0f,32,f2,e2,88,04,04, 
bc,a1,8a,04,6c,20,75,70, 
86,c7,53,1b,51,48,77,d8B, 
f4,87,22,83,a4,ab,c7,54, 
a5,a3,a4,d4,2a,53,51,32, 
Ba,Bf,ae,bc,76,89,2d,ie, 
94,9f,b1,e2,83,fb,1d,a7, 
f6,65,60,da,a0,29,a5,e5, 
56,21,33,c6,11,8F,b4,08, 
84,04,2d,ba,51,ec,49,75, 
“4b,ca,f®,42,db,21,80,9a, 
c6,34,d5,8b,30,2c,04,27, 
c2,10c,18,15,06,da,48,6d, 
c8,c8,3d,91,40,e0,4b,bc, 
ee,48,8d,35,9F,23,71,9a, 
11,85,08,08,52,dB,7F,70, 
S6,0d,ef,998,db,a3,fc,15, 
67,08,1a,f4,81,d4,84,47, 
97,48,18,b5,f9,10,52,F2, 
a7,e2,81,8b,5f,42,50,01, 
49,28,72,90,89,ad,8d,33, 
af,18,53,68,c8,88,d3,3e, 
35,04,F0,2F,98,66,ce,80, 
e4,1b,0b,4d,se,30,37,08, 
06,39,a3,a0,25,01,15,52, 
c0,36,5f,11,d3,70,1a,65, 
b1,68,d2,a5,14,1b,92,40, 
73,8c,1e,a4,a2,d7,8c,c0, 
£f7,20,0a,f5,f0,1d,37,93, 
02,81,1b,36,b4,8a,80,4a, 
©25,da,67,68,80,b8,a8,e4, 
12,12,83,64,79,£1,3d,34, 
cf,9d,41,19,7c,84,51,69, 
51,c2,50,01,55,2c,14,17, 
cd,4b,2f,80,e9,ce,03,6e, 
fb,e3,40,66,64,49,ee,5a, 
02,44,61,39,a0,28,11,4e, 
40,d1,f2,17,da,5e,30,54, 
6f,00,84,72,00,ae,72,06, 
63,b6,20,58,30,88,09,91, 
84,c0,b8,88,27,7c,b5,c®, 
a0,61,21,39,77,F0,42,59, 
28,25,9d,64,80,65,0b,da, 
42,f8,0e,68,03,49,40,d8, 
3b,83,43,c8,5Ff,11,c2,d8, 
0b,68,06,e4,ab,298,44,12, 
fa,6b,87,20,c8,44,6c,1b, 
c1,298,c0,9a,de,8c,c7,6®, 
e1,2c,81,69,7c,37,0e,41, 
89,F5,bc,a6,44,aa,f9,6c, 
80,78,03,80,73,43,09,7a, 
85,ac,68,dc,2c,32,9f,9c, 
1c,29,3a,97,50,8c,ea,32, 
93,af,11,9d,64,5d,86,61, 
8e,c3,09,d9,66,52,6d,b2, 
83,sa,8a,6c,26,08,9c,c8, 
ed,6c,1d,c8,4e,8d,34,03, 
ed,18,48,44,84,08,3e,b7, 
83,62,24,34,c0,70,b6,52, 
86,b6,9f,58,7b,24,2f,80, 
c0,b8,94,a6,47,23,68,ee, 
45,4f,bd,ee,ab,6d,se,cb, 
9c,c8,25,f4,Ffc,38,9b,64, 
48,59,8e,2a,29,b1,73,6d, 
b8B,ab,75,e3,14,8e,79,94, 
ad,a3,ac,47,39,c0,ec,se5, 
be,0F,33,67,7F,d3,be,ef, 
b7,6d,08,31,20,ef,91,5c, 
8b,69,17,ab,94,da,71,6c, 
85,ac,60,2b,35,8c,c7,4e, 


2559 
2561 
2569 
2571 
2579 
2581 
2589 
8591 
2599 
85a 
2539 
25b1 
25b3 
e5c1 
2509 
85d1 
25d9 
25e1 
8588 
BSFf1 
25£f9 
2601 
2609 
2611 
8619 
28621 
2623 
2631 
2639 
2641 
2649 
2651 
8659 
2661 
26693 
2671 
2679 
2681 
2683 
8691 
26993 
26al 
2689 
26b1 
26b9 
26c1 
2609 
26di1 
2649 
26e1 
26839 
BEF1 
269 
2701 
2709 
e7ı1 
2719 
erei 
2729 
2731 
2739 
2741 
2749 
82751 
2753 
2761 
2769 
2771 
27793 
2781 
2789 
2791 
2799 
27al 
2789 
27b1 
27b9 
27c1 
27c9 
27d1 
2749 
27ei 
27e9 
27E1 
27E9 
2881 


01,F0,d2,b0,9a,31,50,9a, 
3a,36,fc,72,24,33,11,de, 
cc,07,2d,28,07,71,86,02, 
61,01,36,eb,28,14,05,87, 
c0,30,6c,18,53,a2,f6,86, 
90,cb,b6,18,20,21,d2,88, 
6b,89,44,30,62,84,59,36, 
91,82,58,0c,87,74,24,cc, 
Be,3a,72,1d,b9,2a,f8,ed, 
12,ca,38,d1,72,1d,53,c6, 
e1,40,69,b9,1e,0F,1f,85, 
69,2c,67,b9,2d,32,b5,ee, 
b7,31,88,38,e7,58,8c,c7, 
a4,74,e1,ea,cd,89,af,74, 
4d,68,98,93,58,bc,2b,f4, 
a0,1f,69,78,5a,ae,19,d2, 
80,46,4b,c2,dc,708,4a,61, 
75,38,39,32,0c,99,45,b5, 
S6,1a,a8,c1,b1,9e,2c,26, 
ab,36,780,51,cc,37,b9,1e, 
d7,c6,10,16,8a,74,7b,54, 
9b,84,94,47,87,03,4b,ec, 
71,64,20,08,c8,3d,84,68, 
74,fc,45,95,c5,84,ca,3d, 
68,07,af,da,4a,6a,7Ff,db, 
ba,80,4a,9a,3d,d4,e9,4c, 
Bf ,4Ff,54,13,40,d6,3a,0b, 
45,20,12,86,09,68,b“4,ae, 
66,26,ba,e4,0b,95,98,1c, 
2f,ce,53,92,94,03,40,df, 
af,3F,2f,1a,c5,83,a0d,b4, 
6f,c2,d0,36,4b,c5,03,84, 
07,11,be,02,e5,67,5e,bb, 
b0,c9,37,cf,40,18,26,c9, 
bf,03,7e8,b4,6F,d9,36,29, 
a0,01,99,3a,60,87,2d,37, 
4a,7c,44,60,59,d2,ec,df, 
70,67,6£,95,4e,f3,37,83, 
7E,7d,b1,85,bc,29,a7,7a, 
30,ab,ba,d6,a4,ef,95,d9, 
y2,a5,8f,d1,1Ff,18,51,56, 
b0,73,22,f8,86,b3,7a,e3, 
87,a0,50,39,c6,87,9e,02, 
10,91,24,bb,1c,49,b2,e4, 
20,09,89,88,59,cd,34,Bb, 
51,66,a4,e4,31,71,72,d4, 
c3,8b,85,90,28,51,fa,71, 
66,b3,14,12,11,83, 34,94, 
50,13,b5,23,a7,25,9e8,82, 
36,38,4c,fd,cd,71,5a8,d8, 
32,7d,41,10,49,38,68,8f, 
6c,97,58e,98,d1,47,69,4e, 
ae,Sd,ea,de,04,82,88,66, 
4d,b5,cc,bd,55,aa,“4e,?7c, 
4e,3d,36,32,81,8e,39,6a, 
d6,58,6d,50,4b,43,5b,S8, 
9e,43,29,4b,c3,16,9c,5®, 
ac,b6,0c,bd,fa,3d,1c,42, 
d9,b7,31,28,28,08,61,b®, 
dd,1b,06,5e,fd,2a,ab,54, 
9f ,49,88,83,ea,26,3e,c8, 
08,70,23,93,25,88,bd,B1, 
21,1e,46,8d,18,38,e7,4b, 
b9,d1,85,35,87,f6,c2,2e, 
12,b2,da,9b,61,eb,15,52, 
f2,c1,98,65f,69,d8,2b,87, 
bO,a8,0F,21,£9,e7,ca,65, 
61,56,28,17,ec,cc,2f,27, 
57,49,6e,880,cd,ea,9d,84, 
d4,c0,45,42,65,92,4c,ec, 
19,06,20,d4,F4,98,55,75, 
c8,6d,b9,66,4d,c8,9d,c3, 
e4,75,d2,af,7c,1fF,76,17, 
16,03,d6,1d,78,f1,cd,ab, 
80,50,ce,94,61,47,f4,1e, 
bc,78,71,90,66,89,bb,83, 
ce,cf,0f,f®,al,df,78,74, 
e2,02,2d,1e,80,86,15,94, 
2b,67,b2,de,f1,9f,b7,2b, 
54,99,26,8d,a7,08,30,18, 
9c,d6,70,68,3a,de,f3,37, 
41,07,8d,07,d9,52,59,£5, 
b4,Ff,04,67,5a,08,0d,f6, 
2c,83,85,85,8F,18,b®,1d, 
1a,d2,8e,be,94,66,c8,F®, 
28,69,65,76,47,81,1c,@b, 


£6,64,75,ce,83,a4,9b,a“4, 
82,84,83,86,b7,0c,11,cb, 
ab,16,12,60,34,61,7f,5®, 
44,3f,f1,a6,22,e0,df,aS, 
a4,81,07,02,47,4a,9a,04, 
16,33, fa,4b,0c,10,27,3b, 
01,F7,b1,909,4d,02,0F,85, 
33,1f,02,30,aa,ac,22,81, 
dS,89,62,cc,2d,4d,ed,Sc, 
ac,dc,36,48e,23,7d,39,bb, 
83,02,39,1c,d4,37,6b,eS, 
9f,50,1d,ba,79,c5,a7,12, 
£d,937,71,19,78,97,5e,4a, 
82,85,aa,aa,d5,26,7d,4d, 
1b,2f,7e,3d,b®,36,89,01, 
0c,86,fb,18,43,31,ec,c5, 
d3,88,34,30,d9,a5,48,29, 
5b,78,71,01,42,Bf,cd,ab, 
85,98,b4,ce,83,b9,4e,3®, 
8c,70,086,b3,09,07,32,39, 
3F,b3,28,67,2e,a®,ai,B2, 
7c,c8,71,67,d6,bc,cc,®6, 
@d,e6,6c,1c,2c,11,89,43, 
2e,4b,d1,0Ff,18,4a,50,ab, 
13,21,a0,86,e4,57,b9,99, 
43,43,a0,20,63,ed,c7,c6, 
BF ,48,bd,1c,7c,77,f4,8b, 
ef,c5,63,a9,0c,ce,a7,c5, 
31,bf,d3,fe,04,74,32,54, 
ab,20,c1,3b,49,0d,38,1B, 
e0,60,d1,£0,d9,f0,bd,1c, 
49,ea,f4,e1,67,d2,c07,54, 
fc,1e,71,01,c5,8e9,20,c8, 
66,96,30,a1,ab,c2,cf,dS5, 
4c,ad,52,6a,2b,18,9b,dd, 
53,d7,10,3b,79,c4,86,9d, 
49,41,42,76,01,40,48,64, 
01,58,15,c05,e5,ec,35,eB, 
60,8d4,6e9,86,89,f1,c8,8b, 
b1,0e,b8,63,31,17,d3,4f, 
f0,b3,70,d4,a1,68,33,6a, 
f1,a2,18,03,59,63,64,35, 
180,4c,90,00,68,67,10,d9, 
b5,03,1f,6£,58,34,71,45, 
e8,f5,023,bF,14,5Ff,7f,4b, 
1b,21,43,b1,88,71,67,61, 
82,8b,ef,61,40,44,95,8d, 
2a,68,11,b8,6f,23,cf,62, 
1a,bc,2b,fd,38,a8,37,1e, 
71,42,be, 43,24,87,d6, 


PRRRDS: 
333 
63 
# 
5 


63,16,18,ed,ed,db,11,52, 
£8,71,11,42,8F,9a,6c,2a, 
6c,2d,26,1f,F8,6c,81,c5, 
eB,44,95,89,b9,46,6e,ca, 
e4,fB,bc,e2,8b,36,08,d8, 
66,f6,cc,8a,95,56,a9,3b, 
61,44,45,d3,8b6,63,17,02, 
2d,8c,51,66,fd,94,ba,eS, 
02,b5,b9,88,48,ba,ee,26, 
0b,19,8c,7c,9F,66,41,bl, 
74,d6,ca,d4,2c,47,9d,32, 
8c0,65,5Ff,1e,d®,2b,8a,5d, 
d6,10,ab,8F,11,85,d9,e6, 
a8,20,78,14,aa,00,40,ee, 
3c,7f,a2,58,50,00,3d,78, 
87,75,8F,21,4d,74,04,04, 
36,ca,b9,51,5e,d4,ec,7a, 
7c,ab,a6,38e,61,57,0c,7b, 
02,53,34,6c,bd,eS,eb,6®, 
ba,63,d5,11,84,cb,f4,d9, 
54,28,78,43,7c,09,13,89, 
e1,32,f8,12,27,65,ec,62, 
d3,88,91,da,fa,47,49,52, 
3c,ea,47,54,c5,d3,8b,83, 
46,cb,cc,bb,75,e9,a0,24, 
b4,f4,55,d7,36,80,ad,fS, 
c4,45,d5,8b,be,51,42,9a, 
c5,db,04,04,33,1e,ca,15, 
2d,®21,15,ed,0e,b8,3a,a5, 


2ab3 
Baci 
Bac3 
Zadl 
2ad9 
Bael 
2ae9 
2afl 
Bafg 
2b®1 
2b89 
2b11 
2b19 
2b21 
2b23 
2b31 
2b39 
2b41 
2b49 
2b51 
2b59 
2b61 
2b69 
2b71 
2b79 
2b81 
2bB3 
2b91 
2b99 
2bal 
2ba9 
2bbi 
ebb3 
2bc1 
2bc9 
2bdi1 
2bd9 
2bei 
2be9 
ebfi 
ebf9 
2c01 
2009 
2cil 
2c19 
2ec21 
2c23 
2c31 
2c39 
2c4i1 
2c49 
2c51 
2059 
2c61 
2c69 
2c71 
2c79 
2c81 
2c89 
2c91 
2c99 
2cal 
2ca9 
Ecbil 
2cb3 
2ccel 
2cc9 
2cdi 
2cd9 
2cel 
2ce3 
ecfi 
ecf3 
2d®1 
2d83 
2dı1 
2d19 
2d21 
2d29 
2d31 
2439 
2d41 
2d43 
2d51 
2d59 
2d61 


a3,53,83,Ba,1a,fa,18,12, 
d®,43,58,05,c4,28,33,fe, 
b4,6b,ab,cb,d6,c1,97,99, 
07,02,45,5a,ba,b6,15,c5, 
d7,83,80,88,b80,43,31,ec, 
1d,01,4e8,06,c4,34,86,1b, 
c2,a5,17,83,c2,49,17,df, 
d4,cf,31,41,8F,b4,25,49, 
d2,50,87,31,e8,c8,c2,6b, 
e2,fb,80,b8,3e,86,8d,97, 
bd,i1e,bf,a8,27,e5,16,43, 
0c,08,08,60,63,ec,85,d2, 
00,60,45,e8B,Ff5,31,11,17, 
b2,88,70,4e,d2,83,1f,64, 
ce,6b,28,bd,28,d4,5f,78, 
b®,b4,1f,bc,28,57,a3,e®, 
53,1d,2F,14,1d,a5,c2,57, 
06,F7,96,94,23,81,a9,4e, 
d2,e6,b2,d4,35,29,26,76, 
OF,8d,19,55,f6,1a,93,b2, 
c0,c7,db,c7,79,2c,ec,14, 
96,18,30,99,65,02,44,0c, 
67,68,57,57,e5,db,28,dc, 
10,50,a2,60,00,68,c2,41, 
06,84,28,97,96,13,c4,03, 
3b,da,75,7b,57,1c,Ba,®2, 
13,a4,c9,83,23,7f,06,2a, 
4F,54,40,61,60,97,01,di1, 
51,0d,6c,7F,83,63,ce,88, 
44,23,63,03,6d,1a,7d,73, 
dı,12,8F,2a,fe,3f,8f,S0, 
e3,65,45,43,8f,02,8d,79, 
30,64,c09,83,32,0F,06,2a, 
97,14,13,65,95,3Ff,6c,2c, 
c2,52,92,ce,49,ad,85,5d, 
y9,42,cf,41,cc,c5,78,f8, 
9b,58,b7,b9,2a,48,98,di, 
34,50,42,85,5e,58,87,46, 
c1,be,bf,75,94,08,45,di1, 
61,89,60,22,81,82,05,18, 
6c,Fc,8a,d0,d5,e1,76,15, 
2d,14,18,11,99,66,8a,08, 
S5a,a6,59,ad,82,16,36,45, 
66,89,2d,83,9b,cf,a9,8c, 
66,66,2b,83,7a,89,93,05, 
a2,d7,07,64,b8,09,64,6e, 
gf,2b,87,58,98,538,09,57, 
S6,0F ,4c,3e,46,bd,S2,6b, 
51,67,49,bb,f8,ac,2b,4b, 
ae,0c,08,73,91,78,6f,b3, 
£3,aa,85,41,07,27,12,bd, 
ec,78,d8,74,67,c1,1d,04, 
d8,1c,c4,d3,6e,57,c1,Bf, 
3a,20,9b,3b,2d,38,f5,5b, 
1F,1d,70,9d,5c,26,90,28, 
a1,3e,a9,af,28,a1,35,89, 
ab,29,61,35,4c,09,3F,2b, 
12,1b,f3,bc,2b,36,2d,39, 
11,ba,7a,58,74,d2,9d,Se, 
26,45,06,B8e,c6,ba,4f,54, 
4f,89,86,65,d3,ca,5c,®2, 
be,Se,64,03,e7,85,5d,23, 
88,73,15,4d,c8,d8,59,21, 
50,12,79,be,68,04,06,27, 
9e,22,bb,2c,4c,46,e9,6e, 
9e,7b,b6,83,1a,58,35,27, 
55,08,808,21,c1,0F,58,53, 
f3,aa,86,f6,e9,35,42,44, 
95,88, 74,43,50,69,1a,e8, 
b8,37,£0,43,c0,1e,63,5e, 
fe,45,c1,92,8b,82,44,95, 
Be,08,53,32,d8,c6,02,23, 
e4,ca,27,23,4b,7d,96,55, 
99,08,F4,14,b5,5b,16,2e, 
a3,a7,06,8b,da,bf,59,60, 
da,dd,d7,4f,fd,4b,4b,S8, 
Ba,37,2d,c1,34,b6,32,5b, 
3e,e3,4b,d6,c8,4b,9e,cf, 
4b,8d,2e,5a,be,5c,b4,2a, 
bc,cf,8b,70,b9,35,13,23, 
7e,a1,68,1a,85,0e,69,02, 
Sa,24,18,f5,a3,590,a9,2d, 
aa,8c,26,09,f4,70,d2,06, 
49,b80,29,d9,1c,60,55,df, 
4s,7b,09,b2,8d,f5,82,45, 
44,14,20,29,ba,c9,94,16, 


2d69 
2d71 
2473 
2d81 
2d89 
2dS1 
2d99 
2dal 
2daS 
2db1 
2db9 
edci 
2dc9 
2ddi 


2ddS 
2deil 
2de9 

| 2df1 
edfS 
2ed1 
De09 
Beil 
2el19 
2e2l 
2829 
2e31 
2839 
Be4l 
2e43 
2e51 
Be53 
2e6l 
2e63 
2e71 
2879 
2eBl 

, 2889 
Bei 
2899 
Zeal 
2ea9 
2ebl 
Beb93 
Beci 
2ec9 
2edi 
2adS 
Zeei 
2ee9 
Befl 
gef 
2ro1 
2F09 
2rı1 
er19 
er21 

= oer29 
= er31 
= 239 
er41 
2r49 
[14-3 

u 2659 
| 2£61 
2f69 
2f7ı 

m 2£73 
 2re 
‚ 289 
ze 231 
u 2£89 
2fal 
efa9 
2fb1 
efb9 
efci 
2efc9 
efdı 
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 2feil 
' 2fe9 
m 2rfi 
m 283 
‚ 3081 
3009 
3011 


0d,F9,f8,03,38,Ff1,d3,c6, 
d7,4c,da,94,60,db,78,6f, 
c8B,d4,35,cd,43,6F,48,ea, 
d4,ec,3c,61,8e,46,f3,38, 
13,aa,74,39,28,89,0F,4c, 
bce,ff,95,d5,86,3d,22,61, 
Of,cd,af,2b,58,03,F3,c6, 
db,cc,87,70,b3,f9,ba,a5, 
cb,74,03,87,38,e8,35,f3, 
43,b5,f5,c5,3d,9b,60,d5, 
b9,63,02,47,30,c7,83,ce, 
87,9a,54,2d,6e,c8,78,11, 
84,87,ed,18,58e,61,07,f8, 
eb,40,63,6b,89,0e,d6,97, 
68,07,cf ,2a,5e,83,4a,5c, 
e3,8e,06,32,e2,c2,ac,f5, 
1a,1c,11,84,87,5b,97,aa, 
1d,36,29,d5,a0,42,73,4e, 
al,e4,15,4c,87,07,ae,68, 
79,e5,ba,b®,8b,Bd,ae,bf, 
19,28,01,b5,c1,8d,4c,1b, 
f2,52,38,b6,ac,54,e8,35, 
c0,5c,97,05,1d,cd,29,Se, 
ac,e23,66,c0,af,c8,807,cf, 
22,36,6e,d8,1f,4a,03,F3, 
23,2b,cd,3a,4%4,aa,1c,66, 
3c,20,0F,9c,cb,a3,89,01, 
8d,a2,20,3c,fc,e®,2b,23, 
0a,d5,e8,21,88,01,F3,be, 
97,99,56,14,28,11,87,04, 
Be,de,40,48,26,03,f3,1e, 
£0,31,37,2c,42,0d,b1,di, 
81,26,30,90,ea,4a,02,39, 
£1,83,c0d,02,08,01,5F,FS, 
e6,10,58,88,31,cf,1c,f6, 
06,38,28,73,85,99,61,55, 
02,87,8c,24,3a,1f,e5,11, 
4c,43,fc,a8,2b,cc,c2,1e, 
e5,41,60,02,9d,f4,2c,8e3, 
4a,69,4d,28,28,4d,b1,51, 
b3,58,15,da,8e,30,80,c2, 
a85,c1,81,2F,9d,15,29,d6, 
6a,86,af,82,3d,0e,39,72, 
68,58,1b,17,f1,cb,2d, 7b, 
53,ab,ca,bd,30,2b,29,d5, 
ed,5e,83,01,76,06,c6,07, 
9a,02,22,b3,20,d0,52,51, 
52,82,fF7,a7,78,39,a5,5e, 
c0,47,15,95,81,b8,ab,09, 
dS,e8,3d,85,89,29,4f,f6, 
a0,be,22,57,£1,84,0c,03, 
7d,30,a0,22,0b,b7,3a,2a, 
54,c8,28,b3,66,46,87,22, 
9d,96,8c,29,c6,95,7d,ab, 
07,ae,73,8d,28,65,dc,6d, 
bd,F8,e0,45,f3,5d,b4,05S, 
9a,09,31,25,40,c9,18,41, 
a3,6c,28,45,3b,63,18,5a, 
S5,b8,db,79,94,01,af,38, 
18,54,bc,28,52,62,4a,sa, 
b0,838,34,88,18,cb,97,F9, 
de,81,0f,60,1d,9Ff,32,51, 
S52,b6,85,0c,34,e8,11,eB, 
70,ae,80,80,80,84,66,6a, 
08,2d,ea,21,f7,2c,72,30, 
1c,f®,c2,93,05,3b,00,5b, 
b3,ab,ca,83,cf,cc,73,2d, 
c®,ae,84,43,15,909,9c,d2, 
S8,1a,23,df,90,70,40,c6, 
Sc,04,88,7a,61,29,d9,b2, 
e6,aa,b®,f8,a0,8c,28,c3, 
34,98,f2,88,Ff9,e4,a7,3a, 
e4,a3,c2,85,26,24,a9,d5, 
e5,4e,34,ab,d7,64,9a,56, 
2a,d2,4d,2a,2c,d3,5b,53, 
af,4b,20,180,10,30,F7,c0, 
a9,04,88,81,1c,95,53,c®, 
63,20,12,62,24,74,5b,d5, 
S4,fa,d7,be,9d,54,a7,40, 
96,03,35,0c,10,11,10,d2, 
93,eb,43,48,4f,ed,@F,ic, 
06,2e,1a,ce,03,0b,0d,30, 
18,9d4,88,85,35,cf,89,e®, 
3a,cb,bb,88,58,c2,21,®ee, 
0e,00,1f,2b6,83,07,71,7a, 
Sf,66,82,1e,b7,0F,80,51, 


3069 
39871 
3079 
3081 
3083 
3031 
3039 
30a1 
3039 
30b1 
30b3 
30c1 
38c9 
3041 
3049 
38e1 
3889 
30f1 
30f9 
3101 
3109 
3111 
3119 
3121 
3129 
3131 
3139 
3141 
3149 
3151 
3159 
3161 
3169 
3171 


' 3173 


3181 
3189 
3191 
3199 
3lail 
31a9 
31b1 
31b9 
31c1 
31c9 
31d1 
3149 


3lei 


3189 
aıf1ı 
31F9 
3201 
32089 
3211 
3219 
3221 
3229 
3231 
3239 
3241 
3249 
3251 


| 3259 


3261 


ı 3269 


3271 


3273 


3281 
3289 
3291 


3233 


32a1 
3283 
32b1 
32b9 
32c1 


40,d2,64,9b,19,48,c7,5®, 
13,71,6c0,28,84,dd,c6,ec, 
as,52,26,64,50,27,39,e6, 
9e,17,22,1d,78,15,81,c9, 
f8,d8,14,1c,35,d8,53,5b, 
98,cc,81,39,cd,a5,8a,97, 
®a,fB,de,b2,ee,6c,70,64, 
44,05,56,04,3e,41,ec,83, 
e5,78,37,32,57,58,30,ec, 
98,16,8c,13,04,c9,b9,4®, 
Ed,eb,af,16,84,93,04,e1, 
53,5d,94,ad,43,26,c1,48, 
03,58,c1,32,6d,f8,33,01, 
d®,64,c1,9a,72,2a,52,8e, 
12,b7,0a,b6,7a,7e,6e,db, 
72,9b,5f,93,d3,db,9c,ef, 
84,47,al,e2,6d,6d,3a,4c, 
Sc,9a,3b,0d,5e,5b,54,55, 
db,de,55,8e3,64,e2,28,1c, 
37,76,45,77,11,68,c1,28, 
1a,86,b1,40,e1,b4,95,da, 
86,4d,f4,70,da,19,15,d9, 
37,a2,4e,34,ac,ca,e8,1if, 
70,28,de,Se,a2,28,395,27, 
33,ba,ed,25,18,58,e1,79, 
81,f5,3a,46,c1,1e,bb,5Sc, 
27,05,56,2c,24,60,53,F®, 
ac,Se,dc,2c,47,86,46,Fa, 
c4,38,e1,c0,70,c2,d4,7e, 
24,6f,ac,55,4a,de,bc,5®, 
30,39,74,60,d4,8d,b®,ee, 
4d,c5,42,a2,35,f7,49,97, 
e2,a8d,ad,c7,50,3a,9F,3b, 
b2,49,F1,45,42,c6,b8,F3, 
S6,b®,eb,d5,8a,44,e7,3a, 
7d,d9S,ba,82,23,5f,d5,0b, 
52,5d,38,4c,ac,38,F7,5a, 
62,af,d9,99,f5,93,59,ca, 
4a,9d4,67,4b,b3,32,b4,26, 
e1,29,16,76,£9,52,65,a6, 
Se,fa,82,77,43,38,5c,89, 
3b,e5,52,a4,46,29,00,85, 
4b,4b,se,7a,e2,88,bf,87, 
1e,02,cb,2a,94,95,3a,al, 
6b,cb,3a8,33,ba,a4,a8,88, 
85,99,40,0a,ec,84,a6,bb, 
03,49,df,dc,61,58,ee,a4, 
ef,de,f®,12,ee,34,61,36, 
3d,fe,2d,e3,da,bf,c4,01, 
78e,e5,57,92,87,53,54,88, 
84,51,0e,b9,39,4b,3b,2b, 
S6,28,6f,85,58,c2,39,18, 
of ,Se,40,c7,02,07,22,37, 
1c,f9,8c,c9,2a,75,02,97, 
bc,88,35,62,81,bl,ee,8d, 
a7,09,55,0e,3e,57,a2,79, 
21,b8,d0,26,43,81,81,8b, 
cc,de,a0,39,b2,b1,6a,3d, 
70,60,2b,e2,c2,c5,®e,ac, 
0d,a3,92,8e,52,c3,dc,®c, 
8d,d2,22,d2,F0,d7,el,8e, 
47,9a,ec,36,14,20,71,1e, 
bb,b1,41,F7,20,d9,9e,ad, 
b5,21,0c,d2,75,c1,23,40, 
c7,81,20,44,52,4d,F9,4c, 
a8,13,30,14,b9,93,28,16, 
b2,88,55,ac,82,81,6c,e®, 
85,5b,38,28,17,b6,0a,55, 
ed,83,55,2e,d9,96,7a,37, 
Y4a,66,dd,f6,16,53,59,04, 
28,48,be,da,c8,27,61,3d, 
b6,70,4e,aa,f6,f6,c1,3a, 
86,28,cc,74,cc,d8,e8,86, 
57,2c,78,5c,c8,80,46,65, 
Be,84,3e8,4c,2c,88,cc,74, 
64,5d,2c,20,63,92,27,50, 
7d,ees,18,e4,b8,88,d2,99, 
d9,b6,7c,72,5d,44,58,4c, 
c2,61,12,ad,64,18,48,1c, 
11,4e,81,4a,bd,b0,61,2a, 
S2,ad,90,18,8F,ac,38,F®, 
1c,493,f1,81,ab,bc,f6,4c, 
89,cf,8d,e9,6b,81,e8e,34, 
3c,73,eb,43,61,37,d0,03, 
9c,62,49,49,1d,d3,19,a6, 
ed,56,bb,36,e6,5d,83,dc, 


3209 
32d1 
32d9 
32e1 
3289 
32F1 
32£3 
3381 
3389 
3311 
3319 
3321 
3329 
3331 
3339 
3341 
3349 
3351 
3359 
3361 
3369 
3371 
3379 
3381 
3383 
3391 
3399 
33a1 
3389 
33b1 
33b9 
33c1 
33c9 
33d1 
33d9 
33e1 
3389 
33F1 
33£9 
3491 
3499 
3411 
3419 
3421 
3429 
3431 


3439 


3441 
3449 
3451 
3459 
3461 
3463 
3471 
3479 
3481 
3489 
3491 
3499 
34al 
34a9 
34b1 
34b9 
34c1 
34c9 


= 34dı 


3449 
34e1 
3489 
341 
34£9 
3501 
3509 
3511 
3519 
3521 
3529 
3531 
3539 
3541 


| 3549 


3551 
3559 
3561 
3569 
3571 
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6c,ce,Sc,fa,18,db,29,ec, 
d2,1a,88,19,87,65,86,77, 
b2,d5,a7,09,d1,81,b5,ce, 
52,a7,a7,c7,23,be,81,3b, 
a3,48,0e,ff,b2,3d,7d,Fe, 
27,a8,c5,84,81,be,Se,cc, 
ed,40,44,5c,91,80,50,30, 
38,20,5c,4d,c6,14,c8,d4, 
a9,12,a7,58,48,84,bd,11, 
4a,c8,88,b9,18,44,74,11, 
13,a3,ca,92,e3,c1,1c,b9, 
31,e5,45,cf,f6,d4,ca,a3, 
a3,27,ed,ab,8F,b9,63,ca, 
19,a4,b8,f0,67,22,a5,5e, 
Se,c9,45,4a,ce,Ba,35,7F, 
a4,54,02,ab,2c,1d,2a,a2, 
2a,a5,c2,9e,18,e4,d0,89, 
a5,4b,ab,38,53,89,48,b3, 
53,fe,de,14,ba,54,d1,c9, 
49,2e,d6,b4,cd,b6,63,40, 
50,85,d0,9F,5b,3b,de,dc, 
ce,931,66,7d,86,ae,ca,af, 
c7,f6,fc,72,63,7a,e1,c9, 
81,58,1d,780,c1,1b,63,61, 
4c,4e,fa,46,95,07,29,6b, 
1b,21,ea,33,1f,£9,d4,di, 
50,b1,bb,45,dc,ca,15,43, 
7e,39,d8,9b,92,28,0b,ab, 
35,80,53,fa,f5,bf,50,5a, 
s®,20,6b,fe,2e,29,d0,20, 
dS,de,e7,a8,c2,84,81,b8, 
cf,50,11,d2,48,84,a4,61, 
30,20,4e,73,3b,5e,8d,0d, 
18,4a,43,a4,al,2c,4e,d7, 
93,3F,51,ee,54,4f,3c,Fe, 
b1,4b,1c,8e,a2,20,09,ce, 
69,b8,53,d4,6a,3c,ac,fa, 
37,33,12,88,F8,5d,09,28, 
14,46,c0,81,8c,b9,9d,08, 
a7,82,2c,73,d8,16,28,08, 
7c,80,68,11,13,dc,e2,56, 
ea,04,3e,4c,69,59,8d,6c, 
87,05,10,cc,95,3Ff,03,51, 
f2,12,4a,9a,16,b2,8c,®e, 
Sf,ca,57,be,dS,5a,df,86, 
90,3F,05,6b,48,9c,a5,c0, 
af,093,5b,7b,ec,33,90,22, 
55,10,55,9c,51,a4,62,99, 
b2,78,9d,15,ea,89,1c,e7, 
ec,96,6d,86,01,a2,a4,62, 
ef,5b,53,cf,f6,d5,fc,18, 
d2,b3,23,48,4c,01,b9,f8, 
06,51,2f ,4a,1a,f4,34,54, 
5c,43,b9,60,47,29,10,b®, 
1c,bc,33,f1,e3,ab,a5,25, 
39,af,e2a,82,2b,21,21,14, 
86,1d,4f,89,c0,80,c2,c8, 
60,00,c3,a9,£3,38,10,11, 
S2,0d,e1,bc,87,29,7c,56, 
28,00,51,11,64,28,21,31, 
38,28,c8,6b,08,d5,29,F0, 
a4,b8,35,e9,b6,8c,c7,47, 
34,71,0e,ab,50,b7,di,el, 
2a,83,1c,89,ce,b®,e3,c®, 
4d,22,dd,21,ba,27,40,e6, 
70,03,1c,93,3a,83,57,70, 
33,c8,8e,a9,da,82,02,07, 
24,83,03,5d,d8,5d,5e,12, 
c2,9d,d5,d9,2b,64,97,ce, 
bf,f®,a9,42,7b,2b,1d,2c, 
35,00,d0,22,06,64,a4,50, 
39,e8,90,83,c1,73,26,34, 
0d,f5,73,6a,ac,61,42,40, 
de,43,20,d8,04,0e,44,24, 
d2,c5,51,85,74,c8,9c,ea, 
00,f5,9Ff,24,09,44,26,55, 
40,19,84,44,d8,f0,90,37, 
a2,06,02c,d8,88,d0,3c,5d, 
72,ac0,80,86,21,32,d7,84, 
81,bd,06,02,08,71,80,Ff1, 
75,07,56,2c,24,ac,cb,b2, 
1c,b8,30,ea,72,23,be,4d, 
35,89,a1,a1,61,07,0c,1b, 
12,12,90,a6,a1,a2,42,71, 
d®,cc,a4,29,08,56,4e,7d, 
2c,32,30,b8,F8,66,dd,a$, 


3579 


. 3581 


3589 
3591 
3599 
35a1 
3589 
35b1 
35b3 
35c1 
3509 
35d1 
3549 
35el 
3583 
35F1 
35F9 
3601 
3603 
3611 
3619 
3621 
36293 
3631 
3639 
3641 
3649 


, 3651 


3659 
3661 
3669 
3671 
3679 
3681 
3689 
3691 
3699 
3631 
3689 
36b1 
36b9 
36c1 
3609 
36d1 
3649 
36el 


' 3689 


36f1 


= 36r3 


3701 
3709 
3711 
3719 
3721 
3729 
3731 
3739 
3741 
3749 


. 3751 


3759 


3761 


3769 
3771 
3779 


= 3781 
” 3789 
\ 3791 


3799 


m 3781 
= 3789 


37b1 
37b9 
37c1 
37c9 
37d1 
3749 
37el 
3789 
37F1 
37£9 
3891 
3889 


44,49,bb,89,c9,be,f5,9a, 
d2 ,4a,25,85,05,d4,f9,64, 
9a,d7,48,c1 3a.2e, 2a,76, 
14,dd,2e,38,69,09,d3,cd, 
c2,e3,f0,90,b0,8b,09,17, 
0d,7a, 1a,34, 40, ae,56, IE; 
29,38,23,89,90,70,73, Be, 
3e.71.d6.ce.38,d9,c7,43, 
38,8a,67,1d,1c,e3,c1,"4c, 
0a,e9,72,0d,8d,2a,c0,ed, 
03,0e,a7,a5,4Ff,05,F0,72, 
97,49,29,14,0b,e4,f6,cB, 
30,2b,69,62,68,47,27,74, 
bb,Be,de,43,c7,03,ac,ef, 
b6,a6,2e,f0,a9,00,cf,2S, 
e6,f2,c2,b1,1b,c8,04,7F, 
59.06.84.84.46.16.12,05, 
6a2,09,26,b1,95,90,04,ac, 
9e,14,80,95,93,83,29,30, 
9e,88,05,cc,95,61,29,16, 
ac,81,d4,393,e0,d8,58,c2, 
58,c3,fe,1b,63,5a,01,1f, 
d4,71,c1,2b,20,25,64,05, 
db,a9,d4,22, de,ad, 5d,75, 
02,eb,ad,bb,68,d2,30, Ba, 
79,d1,2d,43,5e,c®,bc,®5, 
d7,54,dc,06,52,dc,83,26, 
91,5b,44,8b,49,58,49,06, 
0d4,86,be,d8,58,f8,0c,bc, 
dd,e0,5d,75,87,12,04,19, 
ad,®1,1b,6f,83,399,9e, be, 
a8.17.67.44,95,16,3d,cc, 
d1,84,36,d4,88,1c,83,6f, 
c1,2b,20,ff,02,56,4a,44, 
95,91,3d,f2,14,4b,d7,4f, 
13,c2,62,9c,28,98,2b,1e, 
25,28,a3,a3,25,78,19,cd, 
94,a0,b8B,3a,f7,ca,d6,d9, 
Y4a,1d,49,2d,04,ad, Ge.14, 
ae,Sa,db,5b,4c,b3,41,28, 
28,4b,7a,db,5b,5a,ed,da, 
e3,ae,3d,a0,33,17,60,27, 
2e,b9,74,44,04,8Ff,f4,4c, 
4B.c2.22.14.c8.90,41,dc, 
45,84,25,87,8c,28,F0,28, 
c3,83,02,b7,b7,39,8f,Bb, 
b2,84,04,27,b4,3a,10,Ff, 
3d,c®,42,1d,11, 4a,31, 36, 
76,42,bc,92,fe,21,1c,a't, 
d3'ca.9a.52.d7.67,fd,1f, 
0b,3a,af,75,1e,86,c9,c9, 
6b,17,86,48,88,c3,04,d®, 
b9,4e,13,50,e8,2c,1b,87, 
dS,dd,4a,34,14,df,47,11, 
a7,50,28,ef,b7,ef,43,26, 
e1,bd,2c,09,18,65,63,c2, 
ec,e7,36,b63,73,13,91,19, 
19,7E,939,27,aa,b3,7c,®8, 
2e,5c, 74,£2,43,00,b7,a®, 
d1,d8,d9,7b,2d,ec, 45,47, 
25,8b,1a,a4,Ff3,Ffd,4c,c3, 
ae.9a, 44 9a,af,Be,ac,57, 
al,db,6e,9a,56,29,a9,65, 
99,b®,ab,b3,a4,2d,4a 'Sn, 
e5,b5,4e,7b,13,11,86,396, 
82,66,9e,a8,c9,89,10,74, 
36,d2,da,e9,29,56,89,d7, 
46,b5,88,b4,2c,47,57,0b, 
cf,39,25,e2,22,65,db,54, 
a3,1c,86,f1,b7,f6,ca,bB, 
10,36,17,71,b0,61,1f,3b, 
d3'Sa.3b.ef,Sb,8e,81,4d, 
e9,6b,df,7b,4c,42,43,33, 
72,a2,66,1a,b6,26,23,74, 
f4,b3,6b,67,aa,b2,b6,44, 
17,b1,23,75,81,28,04,15, 
d7,10,a8,a4,f5,d7,28,30, 
bo,24,64,ef,95,77,15,01, 
3a.97, 81,01,66,07,32,59, 

18,5d,d3,97,f1,e1,b®,61, 
a9.39.80,0F.0e,e4,06,35, 
42,bf,8f,3b,7c,a4,12,ca, 
05,44,16,d0,d1,c1,13,3d, 


3811 
3819 
3821 
3829 
3831 
3839 
3841 
3843 
3851 
3859 
3861 
3869 
3871 
3873 
3881 
3889 
3891 
3899 
3881 
3889 
38b1 
38b9 
38c1 
3809 
38d1 
38d9 
38e1 
3883 
38Ff1 
38F9 
3901 
39893 
3911 
3919 
3921 
39293 
3931 
3939 
3941 
3949 
3951 
3959 
3961 
3969 
3971 
3979 
3981 
3989 
3991 
3999 
39a1 
3989 
39b1 
39b3 
39c1 
39c9 
3941 
3949 
39e1 
3989 
39F1 
39£9 
3a01 
3a09 
3all 
3a19 
3a21 
3a29 
3a31 
3339 
3a41 
3a49 
3a51 
3a59 
3a61 
3a69 
3a71 
3879 
3aB1 
3889 
3ası 
3399 
3aal 


eb,92,77,ca,Ba,85,ad,2e, 
95,25,8a,fe,38,1a,54,di, 
1d,fe,40,52,26,89,fb,14, 
36,68,2c,28,82,28,91,6d, 
50,1d,48,48,d5,ac,13,fe, 
84,08,81,f4,d2,47,7b,31, 
1c,58,53,28,d1,35,68,91, 
e2,c5,54,9a,d5,de,69, fl, 
34,46,b5,15,55,ee,b4,“4b, 
d3,20,47,22,dd,34,47,01, 
00,85,3c,bd,91,c3,1f,5a, 
66,0c,8e4,cc,18,71,03,86, 
6c,12,72,£8,85,60,25,c8, 
30,1a,99,70,d3,10,36,c3, 
af,02,82,30,d0,78,85,0f, 
15,02,38,96,89,bf,80,5b, 
c3,a7,16,b8,50,76,55,80, 
c®,4Ff,61,41,db,a2,4a,14, 
10,2e,ac,4d,aa,di,b2,F8, 
12,2a,d6,5e,dc,ce,b1,4®, 
b6,43,24,81,41,c3,88,10, 
10,c1,66,40,da,5d,85,66, 
98,c0,04,827,6c,d6,48,f3, 
dd,ed,09,56,79,d8,91,c7, 
54,c5,41,390,d0,2b,58,b2, 
14,07,04,54,8F,64,88,b't, 
b8,1b,4b,ba,71,79,c5,e6, 
18,15,57,78,01,75,60,8d, 
a5,d8,4a,9a,70,a7,53,84, 
92,87,09,af,36,46,c5,®d, 
4a,72, bc,37,af,c0,45,43, 
bf,02,80,39,81,ad,48,9®, 
97,74,82,87,46,64,4b,44, 
9f,14,3d,dd,12,F0,e5,f6, 
Ba,06,62,e8,6e,c5,05,cc, 
80,c0,97,87,1e,54,26,be, 
1d.1c.b1.87,ea,4f ‚db, 57, 
16,54,04,9d,44,be,65,9c, 
89,58,45,42,2d,96,06,15, 


13,3b,7c,ab,cc,dc,39d,f2, 
88,d0,84, ee.s6. 16,cc, Sc. 
91 ‚db, 43)b5, bc,b6,83,61, 
ce,ce,25,33,36,79,ce,eS, 
70 "Sc,ec.33.89,9d.c8,38, 
0a,28,4e,96,e8,8a,7c,bc, 
e1,33,8d,eb,69,02,30,33, 
Yb,f2,da,5b,81,8a,66,28, 
a8,5a,32,d3, rege 
32,6b,8a,1a,1e,03,36,3b, 


32.4d.6a,74,4b.4d,2c,4b, 
y1,42,66,35,ad,b3,1a,dd, 
b3,1c,1d,b3,1c,1d,b7,da, 
90,30,a8,32,30,89,a1t,ea, 
25,76, Ba.ıe, 76,28,16,97, 

y1,f2,ed,c7,10,b4,13,b®, 
19,10,7c,ba,9d,22,ed,13, 
d9,29,09,52,8F,49,42,Sc, 
BF ,6b,e2,d8,54,86,0d,83, 
d1,66,cb, 4e.b2, aa,62,2b, 
d®,81,8e8,a1,32,47,58, Ec, 
37,16,85,60,77,5c,6®,ca, 
e6,4b,58,28,4d,22,6c,6f, 
7£,77,“48, Be.s1, 0c,7b,61, 
£9,15,48,ab,69,52,97,66, 
df,91,ba,ae,15,27,05, Bc, 
86,c7,c2,92,7c,64,988,396, 
3a,2d,48,8c,52,07,f5,31, 
yF,15,92,ec,c1,dc,77,6e, 
28,fb,a2,d7,69,65,db,22, 
bb,75,3b,bc,®a,7b,6a, 7c, 
88,86,21 "4e.c3, £7,60,ee, 
y2,4b,e4,f8,33,28,91,890, 
4c,8c,34,14,61,a3, fl, Da. 
Se,6b,73,22,3e8,17,6f,83, 
aa,a2,1a,46,68, Be,eb, FB, 
8e,dc,9d,a8,29,82,89,68, 
b4,76,84,70,68,f1,0b,1f, 
61,57,6c,36,13,29,bc,ca, 
ba,a0,fd,70,74,64,b8,d0, 
47,5a,4Ff,a8,31,77,3e,45, 
64,bb,32,5d,ae,18,b6,a4, 
d7,935,24,d6,87,46,“a, Sa, 
d4,94,b4,89,3F,6d,49,Fb, 


e4b7 
e4bf 
e4c7 
etcf 
e4d7 


2a,69,b5,c7,b5S,ae,3c,ad, 
75,7F,db,d7,06,d8,ea,43, 
34,81,b3,72,60,ca,1b,32, 
78,83,61,ce,69,da,60,c®, 
da,35,46,ee,65,de,4e,fb, 
86,ad,93,5a,d0,da,09,31, 
ad,11,e3,96,77,803,0b,79, 
c1,c8,88,76,13,0a,ab,B2, 
06,20,25,54,38,21,ae,33, 
49,79,e0,c5,a5,48,89, ic, 
c7, Ya.ce, 9F,1a,79,87,c5, 
93,86,83,7d,18,4d,b4,15, 
4f,08,32,db,68,2d,17,08, 
31.67.d0.49,2d,ad,aa,Sc, 
68,38,d6,d0,5a,27,1a,®c, 
54,ea,86,ac,79,74,e3,08, 
6b,d9,35,e5,2a,6b,ca,bf, 
14,10,77,06,38,86,0a,'4, 
de ,42,20,0c,74,b0,b®,20, 
61,77,01,b7,dc,da,a8,f5, 
8c,19,04,7d,ae,8d,b5,03, 
e5,73,d9,a0,c0,a0,09,593, 
3a,07,0.0,2e,64,B4,aa ‘os, 
0c,83,6d,490,d2,64,02,73, 
98,39,4b,85,3e,02,20, 88, 
7c,94,c6,63,cf,84,aa,22, 
2b,25,20,20,72,42,9fF, e3, 
35,28,44,b9,92,73,8f,06, 
4d,79,54,94,54,93,74,b7, 
91,84,4d,0d,89,24,3b, be, 
3c,81,b0,47,c3,3c,f4,bc, 
39,39,60, 28.8c, 8d,b1,1®, 
59,83,d1,53,1a,3a,02,00, 
S8,ec,df,c3,29,0d,ci "us, 
de, 34, 0d,10,e8,06,38,17, 
88,09,b2,e5,c6,28,53, de, 
83,d7,82,96,a7,b6,7e,5c, 
07,72,10,40,d6,54, 28,94, 
Od, 38,31,e5, 83,c6,1a,60, 
3d,a0,58,33,12,45,02,f1, 
d®,ae,66,25,82,7d,1c, 3a, 
e6,23,26,d9,34,35,cc,c4, 
b1,18,ef,d7,31,39,36,al, 
a8,92,65,83,64,e2,2d, 13, 
06,dF,12,b9,a4,d3,46,d3, 
4c,d3,ce,c5,86,fd,02,32, 
69.e5.0a.Fe,3a,85,4b,1c, 
15,51,f3,96,41,0d,d9,cc, 
58,6f,44,93,86,09,25,6e, 
1a,da,4d, 7b,53,92,d6,af, 
24,70,2b,e4,a5,ad,13,5f, 
35.e1.1c.09.64,6d,F7,11, 
81,dc,46,17,71,19,4d,c4, 
eb,70,88,1c,84,69,32,11, 
51,70,8e,4d,c2,33,bd,88, 
cd,5c,22,73,99,25,64,22, 
18,581, Ze,64, 22,2b,21,30, 
64, 25,4b,84,35,c2,26,b7, 
28,59, 48,en,16, 32,38, ss, 
90,Be,a1,04,75,0a,62,3e, 
87,1c,75,80b,1b,1c,Be,Sa, 
5c,92,be,11,00,88,24,a4, 
42,85,27,1d,42,b3, Be,al, 
ef,1c,8Ff,Ba,20,91,91,e4, 
da,Bf, 21,91,ec,db,084,d®, 
35,88,15,c5,f2,26,9c,b®, 


ad,ff,d3,30,1b,ad,4®,dd, 
48,29,3F,09,40,Bd,40,dd, 
68,4c,40,d0,ad,40,dd,29, 
3F,04,70,dc,8d,4®,dd,ea, 
6cC,14,03,90,008,00,00,00, 


Listing 2: BMS-Umschaltroutine zum 
Einknüpfen in eigene Betriebssysteme. 


Wenn die Raumfahrttechnologie ebenso rasant 
fortgeschritten wäre wie die Computertechnologie, 
dann könnte dies 

heute der 

Blick aus 


Ihrem 
[ 
f 


Büro- 
fenster ##%4 


sen. 4 


j Nie zuvor in der Geschichte der Menschheit sind Communication verantwortlich und in Unternehmen aller 
Anstrengungen auf technologischem Gebiet so rapide Größenklassen vertreten sind, mit unseren Publikationen 
vorangetrieben worden, wie in der Computer-Industrie in Asien, Australien und U.S.A. 
der letzten 40 Jahre. Um mit derartigen Entwicklungen Und wir helfen Ihnen, die PC-Anwender anzuspre- 
Schritt zu halten, bedarf es aktueller und zuverlässiger chen, entweder über unsere allgemeinen Microcomputer- 
Informationen. Zeitschriften, oder über unsere produktspezifischen 
Und da genau setzen wir an. Wir, dieCW Communica- Magazine. Wir decken diese Zielgruppe in 19 Ländern ab: 
tions Inc., weltweit größter Herausgeber von Computer- Argentinien, Australien, Brasilien, Bundesrepublik 
Fachzeitschriften. Mehr als 12 Millionen Menschen auf Deutschland, Chile, Dänemark, Finnland, Frankreich, 
der ganzen Welt verlassen sich auf unsere Informationen. Griechenland, Großbritannien, Israel, Italien, Nieder- 
Wenn Sie Ihre Produkte oder Dienstleistungen weltweit lande, Norwegen, Spanien, Schweden, Volksrepublik 
oder national vermarkten, dann können wir helfen. China und U.S.A. 
Wir helfen Ihnen, die EDV-Verantwortlichen von Mit- „Entdecken Sie, wie einfach es ist, Ihre Zielgruppe in 
tel- und Großbetrieben zu erreichen. Wir haben insgesamt diesen Märkten zu erreichen. Wenn Sie Computer und 
27 Publikationen für diese Zielgruppen in Argentinien, Ve wandte Produkte sowie Dienstleistungen anbieten, 
Asien, Australien, Brasilien, Bundesrepublik Deutsch- können Sie ek en Anzeigen-Service profitieren, 
land, Chile, Dänemark, Finnland, Frankreich, Groß- der Sie direkt zu Ihren Kunden bringt. Rufen Sie Frau 
britannien, Indien, Israel, Italien, Japan, Süd-Korea, Kaiser unter (089) 3 60 86-0 an, um mehr darüber zu 
Mexiko, Niederlande, Norwegen, Österreich, Saudi erfahren. Oder schreiben Sie an nachfolgende Adresse: 


Arabien, Spanien, Schweden, Schweiz, Ungarn, U.S.A., 
Volksrepublik China, Venezuela. 


Wir helfen Ihnen, Kontakt zu knüpfen zu Wiederver- CW &} PUBLIKATIONEN 


käufern, also System-Häuser, Software Häuser, VAR’s, 
Distributoren, Händler und andere, die Ihre Computer- 

Produkte weiterverkaufen. Wir haben Publikationen die 
dieses Marktsegment in der Bundesrepublik Deutschland, 
Frankreich und U.S.A. erreichen. 


CW-Publikationen GmbH 
Brigitte Kaiser 
Postfach 40 04 29 
Wir helfen Ihnen, die Profis im Bereich Communica- Rheinstr. 28, 8000 München 40 
tions zu erreichen, die für Daten-, Sprach und Video- Tel.: (089) 36 086-0, Telex: 5 215 350 


Wollen Sie kaufen oder verkaufen? Dann liegen Sie 
richtig mit Ihrem Angebot im RUNBOARD mit 
preiswerten Kleinanzeigen! Hier finden Sie alles 
rund um Ihren Computer. Wir berechnen für 6 Zei- 
len 5,— DM und für jede weitere Zeile 1,— DM. 
Benutzen Sie für Ihre RUNBOARD-Anzeige unsere 


Verkaufe Software 


Verkaufe Input 64-Sammlung: Bei- 
hefte+Kassetten 1/85-1/87 gesamte 
Sammlung DM 250.— VB. Hefte auch 
einzeln. Angebote an Matthias Ost- 
kamp, Boecklerstr. 10, 3410 Nort- 
heim. Keine Annufe! 


4 SUPER-SEXSPIELE für C16 auf 
Kassette für nur 25.— DM inklusive 
Hardcopy Routine. Smeets G., Van 
Wayenberghstr. 14, 1820 Strombeck- 
Bever, Belgien 
C-128-Fibuprogramm (selbstge- 
schrieben) in Verbindung mit Epson- 
Drucker FX-85 gegen Selbstkosten- 
preis. Telefon: 02 31/73 70 29 
WORDCHECK auf dem PC 128: 
Rechtschreibkontrolle für ASCII- 
Texte (auch für Wordstar). Info ge- 
gen frankierten Briefumschlag von: 
Dahm, Untere Bergerheide 1, 5600 
Wuppertal l 


100 C-64-PRG’s für 20.— DM. (5 Dis- 
ketten) Schein an: E. Kobylka, Bucko- 
wer Chaussee 20, 1000 Berlin 49 


PLUS/4 C-16 Anwender Spiele Sa- 
mantha Fox, Strip Poker, Hollywood 
Poker on Disk 20 DM. Turbo-Tape 64 
KB, Turbo-Text, Turbo-Base, Master- 
copy on Tape or Disk 20 DM bar o. 
Scheck an: Jörg Hildebrandt, Schlen- 
kenbrink 25, 4973 Vlotho-Uffeln 


Apfelmännchen!! Diskette mit 40 der 
besten Bilder für nur 10 DM in bar 
incl. Porto u. Verp. 10 DM-Schein an: 
]. Hagemeister, Schmeddinghoffstr. 
26, 4290 Bocholt 


Der Elektronische Hausarzt Medi- 
zin.Lernprogramm (C64/128 Atari) z. 
Diagnose + Selbstbehandlung. Disk 
+ Beiheft 39.— NN. Dr. Braun, Scher- 
baumstr. 7, 8000 München 83 


BILLIG — FUNKTIONELL UND 
GUT! Software f. C64 bzw. C128. Info 
+ Katalog Disk + Demo ey 10.— 
oder per NN! Esocom Pf. 48, 8820 
Gunzenhausen 


LOTTO-ASS-C128 + TOTO-ASS- 
C128 DATEI-ASS-C128 Alle 80 
Zeichen Lotto+Toto mit allen verw- 
Sys. Disk je 30 DM. Alle Zahl v. 1955 
auf Disk 10 DM. Info Hielscher Peter, 
Am Wall 22, 4401 Saerbeck 


: Mathelernprogramm für 
DM 10! Leerdisketten 5% 10 St. DM 
10! 3.5 Zoll 10 St. DM 10! Org. Games 
für C. je 10 DM! 10DM-Schein und 
Wunsch an: H. Cammerer, Lamm- 
gasse, 7073 Lorch 2 


840 Pokes für nur 10 DM!!!! 540 Su- 
perpokes + 300 Prg.pokes dieses 
verspricht ewiges Leben beim Spie- 
len. Schein an ©. Lindhoff, am Schel- 
mengraben 7, 6120 Michelstadt 

Die Dämoneninsel: Deutsches Text- 
adventure mit über 80 (!!) Räumen! 
Alles menügesteuert = einfachste 
Handhabung. Kann sofort ohne 
Kenntnisse gespielt werden. Disk für 
20 DM! Schein an ©. Lindhoff, Schel- 
mengraben 7, 6120 Michelstadt 


AN ALLE VOKABELPAUKER! Ver- 
kaufe spitzenmäßiges Vokabelpro- 
gramm zum Preis von nur 10 DM bei 
H.H. Macht, Postfach 73, 6953 Gun- 
delsheim. Ausf. Info: 1,50 DM 


C-64 SIMONS BASIC-MODUL + 
Engl. Handbuch DM 35. C-64 Macro- 
Assembler, Disc+tengl. Handbuch 
DM 25. Gerd Engels, Loyerender 
Weg 25, 2900 Oldenburg 


64/128 CLUBDISKETTE SEPT. /87 
10 FREEWARE-PROGRAMME plus 
Bilschirmzeitung + CLUBINFO für 10 
DM beim ‚FREE-SOFTWARE 
COMPUTER CLUB, Auf der Heide 
18, 3008 Garbsen 1 


INPUT 64 AUF KASSETTE von !/85- 
8/86 = 20 Stck nur komplett für 100 
DM Gamemaker SF Libr. = 20 DM 
Boulderdash Constr. = 20 DM Polar 
Pierre = 15 DM. 02 01/27 21 66 


BEWÄHRTE ANWENDER- 
PROGRAMME 


KONTOKONTROL für C64 
TERMINKALENDER für C64 
Paetsch, Ätenser-Sand 5b 

2890 Nordham - Info: Freiumschlag 


HI-EDDI/HI-EDDI+Sensation 35 
verschiedene Schriftarten!! Disk für 
20 DM bar; Gratis-Info bei: M. Bruns, 
Tempelhoferstr. 19, 3012 Langenha- 
gen 

Geschichts- od. Politik-Magazin auf 
Disk od. Cas. für C64/128! Info f. 80 
Pf. von Rüdiger Hopf, Am Tüsselbeck 
94, 4200 Oberhausen 11 


Verkaufe Programm zum Ausdruck 
+ zur Erstellung von Rechnungen auf 
dem C16. Info gegen 80 Pf. auf Cass. 
o. Disk. für 15 DM bei: Your Soft Gor- 
don Hische zum Eichtal 20 5370 Kall 6 


Thomas-Soft Tsamadou 4 10683 
Athina-Greece. Software Commodo- 
re-Amiga - Write for a free list 
DREAM GIRLS — brandheiß ein pi- 
kantes deut. Adventure mit Super- 
Bike 4 Diskettenseiten, C64, 29.95 
+ Nachnahme. M. Ahrens, am Quäl- 
berg 6a, 3170 Gifhorn. Fordern Sie In- 
fos an! 


CNC auf C64 Gebe CAD-Drehsimul- 
+ Anwendersoft + Astronomie + DFÜ 
ab. Suche Dolphin DOS 2.0. Info geg. 
frank, Rückumschlag bei B. Janzen, 
Meßkirchstr. 3 in 7795 Kreenheinstet- 
ten. RUNDisks ges. 


C-128+1571+orion CCM-1280+ad- 
omp X100 (Plotter)+ Bücher +Softwa- 
re (z.B. Textomat Plus/Turbo Pascal) 
f. Maus+Joysticks: 3000 DM (Neu- 
preis ca. 4800 DM). 05 11/42 93 19 
Hobby-Astronomen & -Astrolog. 
Progr.Sammlung aller wesentlichen 
astronom. Berechnungen & Umwand- 
lungen (hohe Genauigkeit) INFO ge- 
gen Freiumschlag A. Mesewinkel, Pf. 
20 25, 6670 St. Ingbert 

AN ALLE VOKABELPAUKER! Ver- 
kaufe spitzenmäßiges Vokabelpro- 
gramm zum Preis von nur 10 DM bei 
H.H. Macht, Postfach 73, 6953 Gun- 
delsheim. Ausf. Info: 1,50 DM 
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Vordrucke. In diesem Heft finden Sie unsere Karte 
auf Seite 131 Für weitere Informationen können Sie 
Marianne Gad anrufen, Tel. 0 89/3 60 86-201. 


Anzeigenschluß der nächsterreichbaren Ausgabe 
ist Dienstag, der 6. Oktober 1987. 


BEWÄHRTE ANWENDER- 
PROGRAMME 
KONTOKONTROL für C64 
TERMINKALENDER für C64 
Paetsch, Atenser-Sand 5b 
2890 Nordharn - Info: Freiumschlag 


Verkaufe meine 20 Disks mit Soft- 
ware wie: Delta usw. für nur 100.— 
DM. Telefon: 029 38/15 69 

0-54 # »C-54# +» C-54# #«C-64* 


Verkaufe Hardware 


EPROMS 
Verkaufe das Grafik ROM II 
sk* 45—DM k*k%* 
Endlich Grafik auf dem MPS-802 
EXOS V.3 DM 35.— 64er DOS 50,— 
DM. Rolf Lentge, Telefon: 04 41/ 
85219 


Parallel Speed Copy 
Das Kabel von der 1541 zum C64 
Userport mit Reset, Anleitung zum 
einfachen Einbau + Prog. zu verkau- 
fen nur DM 25. Telefon: 04 41/852 19 


C64 DM 300.— VC 1541 alt 300.— 
Dela Erweiterungsmodul 80.— 
Simonsbasicmodul mit Buchs. DB. 
Final Cartridge II 80 Tel. 07621/ 
4 78 53 ab 18 Uhr fragt nach Werner 


256 K Epromkarte + 7x 27256 Eprom- 
+4fach. Steckplatzerweiterung für 
C64 160 DM. 0 71 53/3 77 71 


Verkaufe: C64C inkl.GEOS. Dataset- 
te, NEWSROOM, STARPAINTER, GlI- 
GACAD PLUS, GEO-MAUS. Joystick 
3DB BÜCHER, versch. Anwender 
Prog. alles 6 Mon. alt DM 600 — Org. 
verpackt Tel. 0 69/74 6967 evt. ein- 
zeln! 1A 


Btx-Anlagen, Anrufbeantworter 
Video, Computer, Funk, Sharp- 


Pocketcomputer PC1403 229 DM, u. 
andere Modelle 0 60 71/28 82 80 


Floppykabel (parallel) Originalanlei- 


tung: Super Huey, Mai o.M. mchonl- 


II, Karateka, Loderunner Calc Result 
Bravo... ./VC 1571 3 Mon. alt Quick- 
byte 2 Public D. für Amiga 0 60 31/ 
6 1950 ab 18 Uhr 


Matrixdrucker CP80X, 4 Schnitt- 
stellen, anschlußfertig an C64 und 
C128 für 390 DM. Speedos 40TR= 65 
DM. Epromkarte mit Modulgen. (256 
K) = 50 DM. Eproms 27512 = 15 DM. 
02 01/27 21 66 


Achtung! Verkaufe C-64 mit 2 Flop- 
pys + Datasette im EDS-Einbausatz 
+ ca. 40 Disk. (Geos) wg. System- 
wechsel. P. Martin, Neubaustr. 64, 
8700 Würzburg 


HARDWARE zu verkaufen Eprom- 
brenner und Löscher sowie Akustik- 
koppler S-21-0, Input 64 auf Cass. div. 
Bücher + Softw. e jen Rückn. 
H-S, Riemenschneider, Über den Hö- 
fen 21, 3452 Hehlen 


MODULE Simon's Basic 35 DM. 
Music Machine 25 DM. Makro- 
Assembler 25 DM. Telefon: 0 78 05/ 
17 80 „Achim" 


Verk. S21d inkl. Softw+Kabel 250 
DM. Oder tausche gegen C64 im gu- 
ten Originalzustand. Freeze Frame + 
oxig. Utillity Disk 100 DM. C64ER 
Eprommer Bausa+ Folien + a.Bautei- 
le 70 DM. 0 71 35/39 78 ab 19 Uhr. 


Verk. C16-64 K. 1551, 1531, 40 Disk 
m. 175 Spielen, 2 Joyst. und Diskbox. 
Preis: 620 DM. Liste anfordern! Alles 
bei M. Skripietz, Buchenweg 29, 3501 
Zierenberg 1, Telefon: 0 56 06/34 18 
— Eseilt — 


Verk. Citizenmatrixdrucker m. 9 Na- 
deln. Druckertyp: 120D Preis: 550 
DM. Anschlußfertig für C16/64/128/ 
+4. Melden bei: M. Skripietz, Bu- 
chenweg 29, 3501 Zierenberg. Tele- 
fon: 0 56 06/34 18 


Verkaufe gesamtes ı C64- 
1541 + Monitor +Simon’s+Joy + Padd- 
les+ Datamat+CAD+ Abdeckhau- 
ben+zig Disks+Zeitungen für nur 
DM 400.— schreibt Peter Klucken, 
Klinkstr. 58, 4630 Bochum 


Verkaufe C16+ 1531+2 Joyst.+Prg. 
Listings, zus. VB 160.— DM; Palla- 
dium Telespiel + 5 Kass. VB 70.— 
DM. Info gegen Rückporto bei C. 
Schönwald, Am Pappeldiek 20, 2970 
Emden (Nur Selbstabh.) 


C64+128KB+1541 +Speeder+ 130 
Disks+Software+massig Literatur- 
+viel Zubehör + 1530+Joystick. Also, 
gleich anrufen!! Mach’ hin! VB nur 
850.— TOP-Zustand 0 70 31/87 64 96 
(Marc) 


Achtung!! Superpreisi C128Syst., 
best. aus: C128 m. 5 Betriebssyst. + 
Scart-Kabel m. 40/80 Z-Umsch. + 
Orig.Superbase+Superscript + 1571 
Floppy + Drucker Epson GX80 Druk- 
ker VB 1400 DM. L. Heinrich, 061 90/ 
4753 


Matrixdrucker CP-80X optisch und 
technisch la + 500 Blatt Papier an- 
schlußfertig für C64 für VB 380.— zu 
verkaufen. Telefon: 02 14/6 32 29 


VERKAUFE C64+Floppy 1541 (erst 
drei Wochen alt). Leider geht es nicht 
unter 700 DM. Markus Nottebrock, 
Johannes-Hesse-Str. 2, 4000 Düssel- 
dorf 13, Telefon: 02 11/71 6882 


Verkaufe Speed-DOS+ 80 DM 
Speed-Dos 2. Laufwerk 50 DM. 2x 
Professional-1541-DOS zu  Speed- 
DOS je 120 DM. Joachim Michaelis, 
Hohenpfahlweg 50, 8420 Kelheim 


VERKAUFE DRUCKER CP80X f. 
C64 anschlußfertig mit Hardcopy- 
prog. gut geeignet f. Grafikprogr. 
Thomas Mitternacht, Wiegentalweg 
3, 7817 Ihringen 1. Preis 500.— VB 
Tel. 0 76 68/55 28 nach 18.00 Uhr 


Verkaufe Fischertechnik Compu- 
ting Baukasten + Interface für C64 
DM 350.—. Verkaufe versch. RUN- 
Ausgaben Telefon: 0561 21/50 84 48 
ab 18.00 Uhr 


Verkaufe Atari 2600 Telespiel (altes 
Modell) kpl. mit 5 Spielkassetten z.B. 
Dig Di Bug 5: Pacman für nur 100 DM 

s e D., Eckeberg 2, 6443 Son- 
= 


DRAG ON = die PrintFoxzeitung!!! 
Graphiken, Zeichens, Workshop, 
Tips, Tricks uvm. Probeheft 4.— DM 
b. T. Korsch Esmarchstr. 120, 2000 
Hamburg 50, Achtung: Amateur-Sta- 
tus, Selbstkostenpreise!!! 


Protext 128 + Textomat 128 zusam- 
men m. Handbücher je 50 DM. Sei- 
kosha GP550AVC 450 DM. Lottomit- 
spieler gesucht! Postfach 112, 5143 
Wassenberg, 02432/3600. Btx 
0 24 32 36 02, BKZ (17) 940 600 666, 


Noch nicht Mitglied im DEHOCA? 
Gleich Unterlagen anfordern gegen 
Rückporto. Postfach 14 30, 3062 Bük- 
keburg 

Wenn der Computer streikt, helfen 
sich die DEHOCA. User untereinan- 
der oder nutzen das bundesweite, 
dezentrale Servicenetz. Info: Postf. 
14 30, 3062 Bückeburg 


Mailbox-Freaks drucken sich ihre 
DEHOCA-Beitrittserklärung selbst 
aus, Zu finden in allen DEHOCA-Re- 
gionalboxen und natürlich in der Ver- 
bands-Zentralbox 0 57 22/38 48 


DEHOCA-Service „Public-Pool“: 
Für alle Mitglieder vermitteln wir die 
besten Tagespreise auf Hardware — 
neu oder gebraucht. Info: Postf. 
14 30, 3062 Bückeburg 


Wenn der Durchblick fehlt: Der DE- 
HOCA-Service „Frageaktion* klärt 
auf im Zusammenwirken mit Firmen 
und Verlagen. Info gibt's unter Postf. 
14 30, 3062 Bückeburg 


Der DEHOCA am Telefon: Wer noch 
mehr über Deutschlands größte 
Usergemeinschaft und seine Ziel- 
gruppen wissen will, wählt an Werk- 
tagen ab 16 Uhr 0 57 22/2 69 39. 


Als Anfänger in den DEHOCA!! Für 
5 Mark im Monat Beitrag gibt es viele 
Vergünstigungen, Angebote und 
Kontakte — lokal und bundesweit. 
Postfach, 3062 Bückeburg 


Als U: in den DEHOCA!! 
PC- und Networkuser finden im Ver- 
band Public-Domain und jede Men- 
ge Tips zum anwenden/progr. Info: 
Postf. 14 30, 3062 Bückeburg 


Für Yamaha PSR-60/70 und 6300 die 
richtigen Editierkarten (Hardc.) SES- 
SION-CARDI!!! Für :C-64 MICRO 
RHYTHM-NSC (Digtal Drummer). 

+ Zum starken Sound die gute Über- 
sicht mit der NSC-SESSION-CARDII! 
(Hardcopy) Porto Info D. Kohlrenken 
2890 Nordenham Postf. 9 


Weihnachtskäufe zu Clubpreisen 
vermittelt der PRINT-Public-Pool 
Markengeräte zu Tagestiefstpreis. 
Wieder ein Service f. Mitglieder des 
DEHOCA, Telefon: 0 57 22/2 69 39 


An alle Computerclubs!!! Informiert 
euch über die Vorzüge als Ortsgrup- 
pe des DEHOCA — auch Einzelmit- 
gliedschaften möglich. Info: Postt. 
14 30, 3062 Bückeburg 


Cl16, 116, Plus/4-Anwender: Der 
Verein speziell für uns! Mit Zeitschrift 
und Software-Bibliothek. Info beim 
hrc e.V. Bauerland 15, 4800 Bielefeld 1 


2. DEHOCA-Messe 
in der Stadthalle Minden 
Zweitägiges Bundestreffen mit öffent- 
lichen Aktivitäten zum 1. Advent. 
Info: Tel. 057 22/2 6939 - 


Als Amiga-Freak in den DEHOCA!! 
Ständige News in der PRINT und 
Amiga-AGs allerorten. Fast 70 Pro- 
zent aller Mitglieder sind Commodo- 
re-User. Info anfordern. Postf. 1430, 
3062 Bückeburg 


EROTIKA —außergewöhnl. Adven- 
ture aufregende Bilder, deutsch, 
C64, 3 Disks, 29.95 + NN. EROTIKA 
II — 19.95, beide 39.95: H. Schmidt, 
Louise-Schroeder-Str. 7, 3000 Hanno- 
ver 61, auch Infos!!! 


C64/128 — SONDERDISKETTE 3 mit 
15 Spieleprogrammen gegen Einsen- 
dung von 10 DM beim Dt. FREE- 
so ARE COMPUTER CLUB, Auf 
d. Heide 18, 3008 Garbsen 1 


-User-Club 
präsentiert: Tips + Tricks etc. Ga- 
rantiert: Stärke durch Einigkeit; GE- 
MEINSAMES Einwirken auf Com- 
modore (fast alle CBM-Geräte vor- 


handen!) Disk nach D2410 WKW 47 


Amiga-Breaker | always have new 
games. If you are interested in swap, 
send me your list/write to — JR. Crak- 
king, 52 Bd du Jubile, 1210 Bruxelles/ 
ng Call 0032024253869. Hi to 
C 


Verkaufe/Tausch 


Achtung!!! Basic / Tips + Listings u. 

Rat für C64/128 wie?? Postkarte: Tho- 

an Goldstein, zur Vogelruthe 4, 4716 
Ifen' 


Tausche Software 


Suche Ta für C64 & 
Amiga. Disk only! Neuste Software, 
ca. 2000 Prg. Evtl. Liste gegen 2,— 
DM Porto. Ulf Hertel, Erich-Hoep- 
nerstr. 40, 4040 Neuss 


Verkaufe Sonstiges 


Für NEWSROOM Deutsche Anlei- 
tung 44S. (A4) mit Bildern (Clip-Art 
S. 172) für 64/128, APPLE, IBM. 1A- 
Qualität. Gratis dazu ca. 200 Spiele- 
pokes für C64. Preis 20.— inkl. Porto, 
per Verrechn.-Scheck oder bar. W. 
Neumayer, Rüppurrer Str. 94, 7500 
Karlsruhe | 


Für FLIGHTSIMULATOR I Deut- 
sche Anleitung 40 S. (A4)+4 Flugkar- 
ten (A3) mit Koordinaten aller 80 Flug- 
plätze. Gratis dazu ca. 200 Spielepo- 
kes für C64. Preis 20.— inkl. Porto, 
gegen Verrechnungsscheck oder in 
bar. W. Neumayer, Rüppurrer Str. 
94, 7500 Karlsruhe | 


Für PRINTFOX Zusätzliche Grafik- 
bilder und 25 neue (selbsterstellte) 
Zeichensätze auf Disketten. Gratisin- 
fo bei W. Neumayer, Rüppurrer Str, 
94, 7500 Karlsruhe 


Verkaufe Original-Anleitungen für 
Commodore 128 PC. dBase II für 35 
DM und Microsoft Multiplan für 35 
DM. Ohne Disketten. Buch: Wordstar 
für den 128 PC. DM 24.—. Telefon: 
08 21/8 43 50. 7 bis 9 Uhr 

Run 9/84—-8/87, 64er 8/84--9/87, 
asm 4/86-9/87 komplett, Happy 
Comp. 11/85—1/87 fast kompl., div. 
Einzelhefte gegen Gebot abzugeben. 
la Zustand. Telefon: 02 14/50 43 88 
abends 


600 Zeitschriften für fast jeden Com- 
puter-Typ zu verkaufen. Ausf. Liste 

gen 1 DM Rückporto bei: CV. 
Bornmatitr, 47-49, 7570 Baden-Ba- 


Suche Hardware 


SUCHE DRINGEND: Drucker-Trei- 
ber für Farbdrucker MCS801 für 
Commodore C64; in Verbindung mit 
Geos! Peter Haury, Trayhstr. 19, 7454 
Bodelshausen, Telefon: 0 74 71/75 94 
Suche defekten mit funk- 
tionsfähiger Tastatur. Zahle gut! An- 
er an Björn Becker. Telefon: 
56 21/55 19 (Deutschland) 


Suche Software 


Suche 
Tausch)! Liste/Angebote an: AF Post- 
fach 11, 822] Stein an der Traun/Ver- 
kaufe C64 Soft u. Hardw. (Games, 


‚Software (Kauf/ 


FF3, MP8-802/C16, Ali/Geo... 
anfordern! 


) Liste 


128? Info gegen 5 DM bei Uwe Gall, 
4250 Bottrop, Schamhölzstr. 49 


an Rene H. Baechtold, Postfachh 21, 
8201 Schaffhausen/Schweiz. Telefon: 
00 41/53/4 4960 ab 20.30 bis 21.00 
Uhr außer Sont. 


SUCHE: Input-Calc, Music-/Paint 
Shop, DAME und Simulatoren für C64 
(zahle auch)! Wer hat Erfahrung mit 
GEOS/Robotertechnik? Telefon: 
0 87 24/6 79 ab 15.45 Uhr. 


BRIDGE Suche Bridge-Page für 
C64/128. Günter Schroebler, (02 51/ 
86 34 39) Nienborgweg 11, 4400 Mün- 
ster 


, Holland. Looking for CON- 
TACTS FROM ALL The WORLD! 


Suche Sonstiges 


Suche kostenlos alle nicht mehr be- 


Suche Programmautoren Haben Sie 
gute Programme geschrieben C64/ 
C128? Info gegen 5 DM bei Uwe Gall, 
4250 Bottrop, Scharnhölzstr. 49 


Commodore-Computer 

präsentiert: Tips + Tricks etc. Ga- 
rantiert: Stärke durch Einigkeit; Ge- 
meinsames Einwirken auf Commo- 
dore (fast alle CBM-Geräte vorhan- 
den!) DISK NACH D2410 WKW 47 


Brot 


für die weit 


EN Fe TR re 


Ab sofort nehmen wir zur 
Bezahlung von RUN-Board-Anzeigen 
keine Schecks mehr entgegen. 


Oktober/87 Um 123 


REN 


GEWERBLICHE GELEGENHEITEN 


Zählt für Sie jeder Millimeter? 
Als Geschäftsmann für wenig Geld in RUN 


präsent sein. 


Und so wird es gemacht! Schicken Sie uns Ihren 
Text mit der genauen Firmenanschrift. Pro ange- 


fangener Zeile (1 Zeile = 


33 Anschläge) berechnen 


Biete an Hardware Biete an Software 


MODULE C64—C128 MODULE 


S/5 Turbo-Disk-Tape-Hardc. 35DM 
Super Hardcopy-Modul 45 DM 
P. Betriebssystem 7*schn. 55 DM 


M. 3000 Turbo-Tape-Disk-Monitor 


a Are "rereinng 65DM 
S-1286*schn. im64M 45 DM 
SX128wieS-128+ ge HC 65DM 
Klemmer & Schulte Elec. 

0 22 33/4 69 67 


E.M.-Arndt-Str. 6, 5030 Alt-Huerth 


R turen/ An- und Verkauf 
Profi-PC-Multimeter 23 Meßber. f. 
C-64 u. C-128. Nur 390.—. V.24- 
Schnittstelle f. C-64 u. C-128. Nur 
60.—. Info kostenlos Fa. Digan Elek- 
tronik GmbH, Am Heidebruch 4, 
8000 München 70 


Münchner Computer 
Commodore C128/D DM 1078,— 
Commodore C16/64K DM 230,— 
Floppy Disk VC 1551 DM 28, — 
StarNL10 DM 59,— 
Compiler C16/64/128 abDM 148,— 
Tel.: 0 89/68 82 26 


G-E-I-S-L-E-R P-R-E-I-S-E im Sep- 
tember:: NEC P5XL DM 2498DM:: 
NEX P 9 3298DM:: NEC P6 1098DM:: 
NEC P7 1398DM:: Festplatten, 20MB 
595DM, NEC 20MB 798DM:: EGA 
komp Card 398DM:: File/Hard, 
Card, 21MB, Steckkarte kompl m 
Controller 695DM:: Epson LX800, 
1802/s, 11 Schriften, 598DM:: BTX/ 
Telex PC/XT/AT Lösung ab 298DM:: 
IBM DOS 3.3 dtsch 250DM:: Lotus 1-2- 
3, dtsch 888DM:: Ashton Tate Sonder- 
preise, z.B. dBaselll 1448DM:: TAN- 
DON «Brother Vertragshändler:: Er- 
fragen Sie den GEISLER PREIS, be- 
vor Sie sich entscheiden!:: Gesamt- 
preislite GRATIS:; Ihre GEISLER 
GmbH:: Leostraße 1:: D4000 Düssel- 
dorf 11:: telex 8582999 geko:: fax 
(02 11) 5892 10:: BTX 02 11 58 84 57: 


Telefon HOTLINE (02 11) 57 80 81 

C64 C128 VC20 User Achtung! 
mit Programmen und dt. 

’ Anleitung nur DM 49.— Versand ge- 
gen Scheck/Nachnahme. Fordern 
Sie unsern kostenlosen Commodore- 
zubehörprospekt an. Firma Klaus 
Schißlbauer, Postfach 1171C, 8458 
Sulzbach, Tel.: 0 96 61/6592 bis 21 
Uhr. Sonderaktion: Legen Sie Ihrer 
Prospektanforderung DM 10.— bei. 
Sie erhalten 10 Superprogramme auf 

Kass. od, Disk für C64/C128, 


C64-Reparatur 25.— + Material 
CS LEMPENS 028 41/242 90. 


Tip: Gerät in Org.-Karton zusenden 
(max. 100.— sonst KV) 


email 
CSS, Peiner Str. 170, 33 BS, (0531) 51015 


® DISKETTEN m. Gar. | 
a 5%“, 48tpi DM 0.75 2D | 
ir m. Austro-Agent.Ringstr.10 

57 Eching, Tel: 0 81 33/61 16 

Software und Zubehör Versand 

SUZERBHENNGHDEEUNEMM 
u Wir liefern Software für B 
EM Commodore C-16/C-116/Plus4 3 
m C64/C128/AmigaundAtarizu M 
® Preisen. 


m Postfach 14 15, 2150 Buxtehude 3 
BEBENBEEREEERHREENNE 


Vereinsprog. 100% Maschinenspr. 
um Stat., Buchf., Text, BEinz 
900 Migl 98DM 
c acoz) 900 Mtgl. 128DM 
C128(80Z) 1800 Mtgl.168DM 
Fa. K.-H. Weiß, Aktienstr. 170 
4300 Essen 11, Tel. 02 01/67 54 49 


BRBERRBRRBERERRRRRNE 
Strategie- und BILANZ 
Thema: Kolonial- und Handelskrieg 
des Frühkapitalismus, C64 + Disk + 
Drucker, Postspielopt., 2-6 Spieler, 
sehr komplex. Info gegen Freium- 
schalg bei: IMAGICA-SOFT Matthias 
Kruse, Industriestr. 12, 2053 Schwar- 
zenbek 


‚ Spielprogramme, 
Utilities C64, ab 50 Pfennig. 
Katalog kostenlos! 
Andreas Mlynek, uch 22 22, 
2990 Papenburg 2 


Kein Geld? Software-Mangel? 
Superpreiswerte Programme ab 
50 Pfennig!!! 

Katalog gratis. Nur bei der 
COMPUTER-TECHNIK 
Andreas Mlynek 
Postfach 22 22, 2990 Papenburg-2 


„Bewerben Sie sich richtig!“ 
0 
ö n uiz, 
Fr 9,50 DM SM fr C-54 
„Biorhytmus" mit der Originalformel- 
+ Ausdruck: 10 DM/C64 
Katalog gratis, Bestellung bitte Geld 
bar (od. Scheck) beilegen. 
COMPUTER-TECHNIK 
Andreas Mlynek 


Postfach 22 22, 2990 Papenburg-2 


„Wo gibt’s denn so etwas ???“ 
„Was ?* 

„Na, Programme ab 50 Pfennig 
für den C-64 Computer!“ 
„Ach so! Die gibt es natürlich 
nur bei der... .“ 
COMPUTER-TECHNIK 
Andreas Mlynek 
Postfach 22 22, 2990 Papenburg 2 


‚124. QM Oktober/87 


wir DM 1,— 


zzgl. ges. MwSt. Sie können Voraus- 


kasse per Scheck leisten; wir schicken Ihnen aber 
auch jederzeit eine Rechnung. Weitere Informatio- 
nen gibt Ihnen gerne Marianne Gad, Tel. 089/ 
3 60 86-201. Anzeigenschluß der nächsterreichba- 
ren Ausgabe ist Dienstag, der 6. Oktober 1987. 


Nützen Sie die gewerbliche RUN-Gelegenheit! 


Lohn + Gehaltsprogramm F. CBM 
64 und andere z, vk. Info + Demodisk 
von F. Spiess, Turbinenstr. 4c, 6800 
Mannheim 31, Tel.: 06 21/72 15 15 


Wordstar 3.0 m. MailMerge Turbo 
Pascal 3.0 f. C 128 je 180,80 DM incl. 
Disk & Handbuch. Konvertierung von 
CP/M-Software auf VC 1541 f. 27,60 
DM je Disk. Weitere Infos gegen 
Rückporto/Umschlag bei Software- 
house Kunz, Stapelbrede 60, 4800 
Bielefeld 1, Tel. 05 21/87 25 04 


Der FIBU/BILANZ-Spezialist für 
C64/C128. Info gegen Rückporto 
oder Demodisc f. 15 DM. Gramatzki 
Ritterlandweg 28, 1000 Berlin 51, Tel. 
030/4 92 64 34 


AIT — Idealisten Team — 
AIT über 250 Public Domain Disks 
= aktuell z.B. über 90 Fish Disks Info 

= 10 DM/Beschreib. der Prg 
2 300 Screens/berechtigt zu: 4+ 1 
= 30 DM 10+1 = 60 DM 30+2 = 170 
DM. Danach & DM 5.— inkl. Kosten 
ab 10 St. Durchsuchen Sie unsere 
Info-Disk wir tauschen: 2 x unsere 
geg. 1 x Ihre AIT— -M. Rönn, Ziege- 
leiweg 32, 3257 Springe 4 (05041/ 
82 29 ab 19 Uhr) 


Plus4/C16/C64-Lermprg. Techn, 
Mathe Schulanw. u. Grafik f. Schule 
+ Beruf, Zahnbetrieb-Hydr/Pneum.- 
Festigk. E-Techn.Vokabeln-Bru- 
chrech. Dreieck Katg. IDM-Briefm. 
Comp.Typ angeben! A. Ristau Peetz- 
weg 9, 332 Salzgitter 1 


! Hallo Leute ! 
Software und Zubehör für Commodo- 
re & Atari « IBM Comoatible. Sucht 
Ihr was? Info gibt's bei MARCO 
MOOR / Postfach 41, CH-5603 Stau- 
fen 


Gratisinfo für C64/C128-User erhält- 
lich bei Fr. Neuper 8473 Pfreimd 
Postfach 72. Gratis!! 


Die Rheinreise 1 u. 2 in 1098 Blocks 
Basic C64 Action Spiele-Karussel auf 
Diskette, je Diskette | oder 2; 29,80 
DM, zu beziehen über Beatrix Höff- 
gen, Äußere Kanalstr. 5, 5000 Köln 30 


C64 Deutsche Clubprogramme 1 DM! 


24-Stunden-Service Info (Rückp.) 
Texasoft, Herthastr. 26, 8 München 19 


C64 100-fach bewährte Programme C128 
BAUFINANZIERUNG, BSV, LVers, HYP DM 129 
LOHNST/EKST86/87,alleEinkünte DM 64 
VEREINSDATEI Listen, Lastschrift DM %9 
FINANZBUCHHALTUNGkomfortabel DM 89 
SONDERAUSGABEN +ZAHLUNGSPLAN DM 29 
INFO: KLAUS HEIN, SALZSTR. 28A 

8950 KAUFBEUREN, Tel. 0 89 41/8 1357 


USA-SOFTWARE. 15 Top-Progr.f.C 
64 Disk nur DM 20.— (Schein/ 
Scheck). Electronic-Vertrieb Otmar 
Riedel, Bahnhofstr. 2, 8901 Kissing 


** SUPERSOFTWARE ST & C64 ** 


Adressen C64 (Verwaltung) 29.— 
Filedatei C64 (Verwaltung) 15.— 
Millionär C64 (Spiel) 29.95 
DiskdateiST (Verwaltung 34.95 
Diskkatalog+ Programme C64 2,— 
uvm. Versand: NN+4.70, VK+ 3— 


Info bei Thorsten Lavid, Web- 
schulstr. 44, 4050 Mönchengladbach 


PROGRAMMIERBLOCK. Für über- 
sichtice Programmdokumentation, 
DM 20.—. Electronic-Vertrieb Otmar 
Riedel, Bahnhofstr. 2, 8901 Kissing 


RE er 
RTS SOFTWARE RTS 
Be 
* Commodore 64 / 16 / Amiga «* 
er 
Wir bieten RIESEN-AUSWAHL 

die NEUESTEN TITEL und KLEINE 
PREISE! 


C64 C64 C64 Kass. Disk. 
Roadrunner... 34.90 44.90 
6-Pak/Hit Pak. 29,90 39.90 
Barbarian........ 3 : 
Dwan Patrol... 
Wonderboy... 
Asterix... 
Samurai Trilogy 
War Games Greats 

SPAN. a lie re 
Space Harrier 

C16+4 CI6 C16+4 

Bomb Jack Il... 24.90 —— 
Jail Brak ........... 1690 —— 
Ninja Master .........u..... 9,0 —— 
Space Pilot........... „19.90 24.90 
Winter Olympiade 29.90 29.90 
2 Se aeg ls: ; . 


UNSER SERVICE 
Zahlen Sie Ihre Rechnung in 3,5 oder 
7 DEE Ben. Bei einen Betra 


von 2 zahlen Sie monatlic 
z.B. 1 7 14 DM. 


Info-Katalog gegen 1.— DM Rück- 
porto. Bei R.T.S. Postfach 31, 
4178 Kevelaer | 


BITTE COMPUTER-TYP ANGEBEN 
er 
RTS SOFTW. RTS 
ER 


Public Domain Software 
Amiga, Atari ST, Comm. 64/128, 
IBM PC/komp., ab 5 DM, Liste gratis, 
Bahre Wertherstr. 443, 

4800 Bielefeld, Tel.: 05 21/16 04 45 


AMIGA — Public Domain! RENT? Fr 
Biete an Software reale Zu Verschiedenes Wir liefern Chemikaln und La- 


=: er borgeräte, auch in Kleinmengen 
10 Disks= 60 DM, 20 Disks= 114 DM . 
** Dias ordnen mit Computer ** 30 Fish Disks nur 160 DM!!! und ohne Mindestbestellwert. 


C64,C128,CPC.JOYCE.IBM-PC und über 200 Disks vorhanden, z.B.: Biete Soft- & Hardware für C 64 u. C | } ordern Sie bitte unsere wort 
Kompatible. Info gegen Rückporto Fish 1-69 oder Panorama 1-37. 128. Info gegen DM 1,— in Briefmar- | KRON.Che: an ee Be 
bei: Dipl.-Ing. Walter Grotkasten, Bir-- Rainer Wolf, Deipe Stegge 187, ken von: Softwareversand M. Lang, 19 N eu ne Ktplatz 5, 
nenweg 6, 7060 Schorndorf, Tel: 4420 Coesfeld, Tel.: 0 25 41/28 74 Im Langen Scheerbaum 13, 6351 Hak- | 571 33/1 70 pie eim, Tel. 
071 81/4 28 46 (Anrufe nur 15 — 18.30 Uhr) kenheim 


MARKTFÜHRER 
1000 Berlin 


u 


IJa, informieren Sie mich, 
wie ich gemeinsam mit Greenpeace zur 
Erhaltung unserer Lebensgrundlagen 
beitragen kann! Schicken Sie mir das Infor- 
mationsmaterial an diese Anschrift: 


Elektr.+elektronische Geräte, ” 
Bauelemente + Werkzeuge 


ELECTRONIC VON A-Z uw, 
Stresemannstr. 95 - Berlin 61 © 
Telefon (030) 261041 


1 

j 1 

i i 

i 1 

i | 

i 1 

N 1 

1 ] 

i ] 

1 Name 1 

ARTS sn 11 1 

1 1 

= ? = j Straße/Nr. I 

Benützen Sie für R I 
ng. . \ Sr EEE BE ih EEE EEE ER — BB 

eilige Anzeigen Landolt Computer 1 PL2/Ort z2005 1 

unseren Beratung, Verkauf, Service, Leasing j Bitte schicken Sie diesen Coupon im ! 

x q Umschlag mit 2,40 DM Unkostenbeitrag i 

Fernschreiber Wingertstr. 114 1 in Briefmarken an: Greenpeace e.V. 1] 

d 6457 Maintal-Dörnigheim H en » 2000 Hamburg 11 \ 

5 215 350 comw Tel. 0 61 81/4 52 93 (Mailbox 48884) I Nr. 2061-206 , Postgiro Hnb , BLZ 200 100 20 I 


MIKRO-COMPUTER:DA STAUNT DIE 
FACHABTEILUNG 


In immer mehr Anwendungsfällen zeigen sich die 
— zunehmend leistungsfähigeren — Personal- und 
Mikrocomputer der traditionellen „Groß“-EDV 
überlegen oder bilden eine excellente Mainframe- 
Ergänzung. Doch so sinnvoll der Mikrocomputer- 
einsatz im Einzelfall sein kann: Der Anwender muß 
dazu auch die „Marketing-Botschaft“ des Herstellers 
dechiffrieren können, um Hardware, Software, 
wirtschaftliche Standfestigkeit des Herstellers und 
passsende Systemkomponenten beurteilen zu können. 
Und der Nutzer von Mikrocomputern muß sich 
bewußt sein, daß ein nicht funktionierender Klein- 
rechner nicht bloß einen Investitionsverlust darstellt 
— sondern den Verlust an Einsatz- und Erfahrungs- 
zeit mit einem wichtigen Werkzeug für die Infor- 
mationsverarbeitung. 

Vor dem Hintergrund intimer Branchenkenntnisse 
des Autors dient dieses Handbuch als Wegweiser 
durch den Dschungel der Angebote und es versteht 
sich als ein Leitfaden, bei Auswahl und Einsatz die 
richtigen Fragen zu stellen, um eine möglichst 
effiziente Nutzung zu erreichen. 


Gerhard J. Pleil 

Handbuch für die Auswahl und Anwendung 

von Mikro-Computern 

346 Seiten, München 1985 Best.-Nr.: ICW 52-4 DM 68,— 


= EDITION 


Fachbücher für die Computerwelt 


\y 
2 /Wir bestelle(n): 
Er Kr] S I Ich 
EEE 
I EEE SEEE E _—____ Expl.Best.Nr.: 
EN SIENEN & Name Vorname 
S IS EEE 
ELLE ZECHE a u ut ee 
DELETE HS Unterschrift Straße 
RIES a R 
x 2, D 
N 


E « Bitte senden Sie mir Ihr Bücherverzeichnis Postleitzahl/Ort 


WAS GIBT’S WO? 


Auf diesen Seiten 
können Sie laufend 
Angebote und neue 
Produkte aus dem 
Hard-, Software- und 
Peripheriebereich 
anbieten. 


„Was gibt’s wo“? 
Wer aktuell informiert 
sein will, findet hier, 

was er sucht. 


C64 : PC 128 : VC20 


menügesteuerte, leicht erlernbare 

Textverarbeitung mit integrierter 
Adreßdatenbank, Selektierung und Steuerung 
nach bis zu 9 verschiedenen 48 
Kriterien u: 
FIBU frei def. Kontenrahmen, automati- 

scher Kontenausdruck, Journal, Kre- 
ditoren, Debitoren, Summen- und Saldenliste, 
Gewinn- und Verlustrechnung, 98 ae: 
Bilanz, BWA ’ 


LOHN komplette Lohnabrechnung, alle 
Lohnarten, Abrechnungslisten für 
Finanzamt, Krankenkasse, etc., 


Überweisungsträger 98,— 
F AKTUR integrierte Lager- und Adreßver- 
waltung, Rechnungen, Angebote, 
Lieferscheine, Umsatzstatistik und 
offenePostenliste,biszu3Mahnstufen hs 


KOMPLETT nur 198, - 


INFO GRATIS 
HD SOFTWARE & BERATUNGS GMBH 


MITTELSTR! 29, 6308 BUTZBACH 5 
TEL. (0 60 33) 6 06 70 


) 
) 07 
— | 


COMPUTERSOFT JONIGK 


c64 Cass Disk Cass Disk 
SummerGamesi 9,90/19,90 PIRATES 39,-/52,— 
COLONY 9% VIDEO TITLESHOP 54,— 
COMPUTER PEOPLE 19,— DEFENDERO.CROWN 49,— 
EXCALIBA/BIGMAC 19,90 COLONIALCONGUEST 89,— 
WIZBALL 239,-/42,— _ KAMPFERUPPE 3- 
LIVINGDAIRLI. 36,—/54.—  VIZASTARBAXLS 188,— 
BARBARIEN 32,—/42,— VIZAWRITEBS “- 


C16 ÜBER 220 VERSCH. PRG. cASS 

CSJGAMESI 29,-/39,— INT. KARATE 19,— 

KENESIS 9.80 ACE (PLUS4) 32,— 

BATTLE 9,80 TERRA NOVA 239,— 

CSJ TURBO TAPE (12facher) + AZIMUTH TAPE DM 29,90 
AMIGA 

BARBARIEN 79,— 

KAMPFGRUPPE %- 

NW SINDBAD 8- 

DEAN en R- 


ARE GRANDSLAMTENNIS 109,— 


SUPER HUEY 69,— 
VIZAWRITE AMIGA 18,— 


ZING KEYS 109,— 
CSJ COMPUTERSOFT JONIGK Riesenauswahl an Software 
An der Tiefenriede 27 sofort CSJ NEWS anfordern 
3000 Hannover 1 bitte Computertyp angeben 
Tel.Service 05 11/88 63 83 Händleranfragen erwünscht. 


KK SOFTWARE * KK SOFTWARE x KK 


Libien? Lybien? Libyen? Wissen Sie's? 
„WELT DER TATSACHEN* trägt Sie nach der richtigen Schreibweise 
Mögliches und Unmögliches aus vielen interessanten Wissensgebieten 
Kein Fachwissen nötig. Für „Teenies“ und „Grufties*. Bis zu 12 Spieler 
können gegeneinander spielen, Durch Eingabe von eigenen Fragen be- 
liebig erweiterbar! 'ad beliebig veränderbar! Ein interes- 
santes und leistungsfähiges QUIZ mit Risiko-, Schnell-Setz- u. Bonus- 
fragen sowie SPEEDOUIZ, wo Schnelligkeit Punkte bringt 
Zu bestellen unter CK 1041 R nur bei uns für nur 24,90 DM. 
RISIKOPOKER 
Spannung wie bei einem Original Spielautomaten. Große farbige Karten- 
darstellung mit Musikausgabe. Überraschend langer Spielspaß. Zu be- 
stellen unter CK 1021 R nur bei uns für nur 9,90 DM. 
DISC/MINT MINU/MINT 
Das Spiel ist eine möglichst naturgetreue Nachbildung von 
2 deutschen Spielautomaten. Mit Startautomatik, Risikoauto- 
matik, Sonderspiele usw. 
Zu bestellen unter CK 1011 R nur bei uns für nur 9,90 DM. 
SUPERLIGA V 3.3 
das ist das umfangreiche, leistungsfähige, bedienertreundliche und ko- 
stengünstige Programm zur Verwaltung von Sport-Tabelien. Nützlich 
für Vereine, Sportreporter sowie Privatpersonen. Einige Merkmale: Ver- 
waltung beliebiger Tabellen mit max. 21 Mannschaften — Einfache Ein- 
gabe von Mannschaften u. Ergebnissen — Ausdruck aller Parameter — 
Berücksichtigung von Nachholspielen — Spezialtabellen (z. B. alle 
Heimspiele) — Simulation von kommenden Spieltagen — Rückblick auf 
vergangene Spieltage u. Tabellen — und und und 
Zu bestellen unter CK 1001 R nur bei uns für nur 24,90 DM. 


Alle Programme für C 64 / C 128 auf Disk. Lieferung per NN/V-Scheck 
zzgl. 3,— DM Vers.Kosten. Bestellen Sie bei A. Kubicki u. M. Kochioef 


KK-Soft, Sebastianstr. 6, 8315 Geisenhausen 


Datum/Unterschrift 


Commodore Farbmonitor 1081 699,-; Commodore AMIGA 500 
1081 


PC/XT-Karte mit 5 Y' "Laufwerk 1169. TPB-Aufrüstung 
. "Laufwerk 1699,-: 20 MB- ep 
- PC-20 


Farbmonitor 1802469 -; Commodore 1901 
Grünmonitor Thomson (35 Mhz, mit Ton) tür C 64/128 
Bernsteinmonitor Samsung MD- 1255 H für Commodore 64 
Schwarzweißternseher Samsung (auf Monitor umschaltbar) 
‚Akustikkoppler Dataphon S 21 d + Kabel + Diskette C 64 
‚Akustikkoppier Dataphon S 21/23 (300 oder 1200 Baud) 
Armbanduhr eraipiehne Terminal RC 1000 (kann vom C64 mit dem 


werden! 
Farbarucker MCS&Dt 801 ad ; Drucker Kock PS 1000) } 


Drucker 1526 449,-; Drucker MPS 803 + Traktoraufsatz 
Epsondrucker anschiußfertig an C 64/128 mit Görlitzintert. 8426: 
LX 800 699,-: FX 800 1059,-: FX 1000 1309,-; L0800 
LO 1000 1549,-; LO 2500 2519,-; EX 800 1469.-: EX 1000 
Epsondrucker anschlußfertig an AMIGA, PC, CPC oder Atari ST: 
1X 800 579,-; FX 800 939,-; FX 1000 1189,-; 10800 
LQ 1000 1429,-: L0 2500 2399,- ; EX 800 1349,- EX 1000 
Starddrucker NL-10anschlußfertig an C 64/128 (dt Version) 

ND- 10 mit Centronicsschnittstelle 


NEC-Drucker P 6 (dt. Version) 1149,-, P 6 Color 


monitor 
PC 1640/Colorm./1 LW 1939,-; Colorm./2LW 
Versandkostenpauschale (Warenwert bis DM 1000,-/darüber): Vorauskasse 
(0M 8,-/20,-), Nachnahme (DM 11, 20/23, na: Ausland (DM 18,-/30,-) 
Vorauskasse. Preis- 


CSV RIEGERT 


Schloßhofstr. 5, 7324 Rechberghausen, Tel. (0 71 61) 5 28 89 


* Superpreise * Superpreise * 
AMIGA 500 1098.— Farbm. 1081 779.— 
AMIGA 500 +1081 1849.— AMIGA 2000 2449. — 
AMIGA 2000 + 1081 3149.— 2.Laufw. 1. 2000 329.— 
PC/XT-Karte 5.25 Zoll 1179.— Externes Laufw. 1010 429.— 


20 MB-Filecard Lapine LT 2000 inkl. Controller 1079.— 
20 MB-Filecard Tandon inkl. Controller 898.— 
PC ION 1898.— PC2OIN 2498.— 
20 MB-Festplatte Segate inkl. Omti Controller 798.— 
” er -Festplatte z.. er ‚ Omti Controller 948.— 
Call VC1541C 379.— 
C128 52. —  Ve15i 579.— 
C 1280 969.— Farbm. 18021.C64 498.— 
Farbm. 19011.C128 679.— Grünm.m.Ton+ Kabel 229.— 
LX 800 579.— FX800 1029.— 
FX 1000 1298.— 10800 1479.— 
LQ 1000 1929.- 102500 2598.— 
800 1398.— EX 1000 1698.— 
$Q 2500 Tintenstrahldrucker 3298.— 
HI 80 Printer Plotter 1: — _ Color-Eins.EX 800/1000 219.— 
NECP6 1198.— NECP7T 1498. — 
NECP6 Color 549.— NECP7 Color 1849. — 
STAR NL 10 wahlweise Schnisiee IBM Commodore, Centronics 598.— 


STARND 10 929.- STARNX 15 breit 848.— 
STAR NB 2410 1498.— STARNB24-15 1798.— 
Einzelblatteinzug für Star NL 10 249.— 


jer Hinweis: Wir liefern nur Deutsche Geräte und Handbü- 
cher. feisiisten kostenlos, gegen adressierten Freiumschlag und 
und mit nehme des gewünschten Artikels. 


Vertebe erınabe GmbittG. Auslandslieferung für die 
Wangenerstr. 99 Schweiz ab Lager Zürich. Be- 
D- DE BR nur In Ravensburg 
Tel. 07 51/39 51 ätigen 

Nur Versand, Abholung der Geräte nur nach Absprache in Aus- 
nahmen möglich 


a u ee 


Zu der in RUN Heft ..., S. ... 


‚erschienenen Anzeige 


gebe ich folgende Bestellung auf: 


Bitte ich um Information über das Produkt: 


Bitte schicken Sie mir [J Preisliste [| Katalog/Prospekt 


Bitte diesen Coupon direkt an die Firma zuschicken. 


Weltneuheit 
GRAPHIC BOOSTER 128" 


für den C-128 und C-128D 

Graphik Booster 128 vergrößert Ihren C-128 von 640 x 

200 Punkten auf 720 x 700 Bildschirmpunkte! Das heißt 

eine ganze A4-Seite! 

* Gralikbefehle Basic, von Basic 7.0 frei programmierbar 

* 7 mal mehr Punkte Auflösung als der C-64 

* 43 bis 50 Textzeilen (IBM Standard 1987!) 

* Bauen Sie Ihren Rechner zum billigsten CAD-System 
der Welt aus! 

Diese Superauflösung ist vom 128-Modus, 64-Modus und 

CPM-Modus ansprechbar. 

Farben: Fading = Farbverläufe über ganzen Bildschirm 

(Qualität wie Fernsehschrifttafeln). Auswahl aus über 

3000 Farben 


Ein Muß für jeden C-128 Besitzer! 


GRAPHIC BOOSTER 128 ist 100% kompatibel: Karte muß 
nie entfernt werden, Sämtlich bestehende Software (inkl 
64er) läuft uneingeschränkt bei eingesteckter Karte! (c)T 
Giger Solothurn Schweiz 1986 

Preis: DM 199.— inklusive Mehrwertsteuer. Vorauskasse 
DM 174.—, DM 7.— Porto, auf Postscheck Nr. 45-306-2 
Combo AG Solothurn CH. Nachnahme BRD DM 174.— 
Porto DM 7.—. Inder Schweiz Fr 199.— 

Verkauf durch: Gratis Info-Material inkl 
COMBO AG original Farbbildschirmfoto! 
Tugginerweg 3 

4500 Solothurn/Schweiz 
Tel.: 065 23 26 86 


Aus BRD: 
0041 65 23 26 86 


%* DIE BESONDERE SOFTWARE % 


Für COMMODORE PC-128 oder C-64: 

— BZ-ASTROMEDIZIN (79,) und BZ-ASTRO- 
PSYCHOLOGIE (99,-) zur Berechnung und astro- 
medizinischen bzw. astropsychologischen Aus- 
wertung von Geburtshoroskopen 

— BZ-HOMÖOPATHIE: umfangr. Programmpaket 
(Repertorisierung v. Einzelmitteln, Erstellung 
hom. Fragebogen, Komplexmitteldatei) für Ärzte, 
Heilpraktiker u. interessierte Laien (PC-128 149,-/ 
C-64 79,-) 


Für COMMODORE PC-128 

— BZ-FINANZ: komfortable Einnahmenüberschuß- 
Rechnung nach $ 4.3 EStG f. Kleingewerbe u. 
Freiberufler; u.a. mit statistischer Auswertung, 
graf. Darstellung (DM 79,-) 

— BZ-DATEI: elektr. Karteikasten zur unkomplizier- 
ten Verwaltung von umfangreichen Stichwort- 
dateien (DM 49,-) 


Für COMMODORE 64 und 128 im 64er-Modus: 

Prof. Programme aus den Bereichen ASTROLOGIE, 
BIORHYTHMIK und PERSÖNLICHKEITSTEST sowie 
HEILPRAKTIKER-AUSBILDUNG 


Fordern Sie bitte unsere umfangreichen Informationen an 


BEATE ZILLE — SOFTWARE 


Oskar-Schindier-Str. 5, D-6000 Frank- 
furt 56, Telefon (0 69) 5 07 70 83 


Deaignnaken 1.0 


Text-und Etiketten-Druckprogr. leich. 
33 Zeichensätze auf Disk in 4 Größen!!! 
Ein eingebauter Editor für Zeichensätze 
erster Klasse. Bis zu 128 Zeichen/Zeile. 
£s können Hires-Srafiken aus Malprog. , 
Spielen, Printshor, Printnaster, Neus- 
Roon, ... in Designnaker-Fornat ungen 
delt und an beliebiger Stelle im Text 
plaziert werden. Bis zu Zeichen auf 
einer Seite. Der Texteditor beherrscht 
Blocksatz, Zeilenabstand, Tabulator, Ko- 
pieren, Verschieben, Druckerbefehle,... 
Sie sehen die Bilder auf dem Bildschirm, 


noch besseren Zeichensätzen (DM 24,98). 


Toharı 11 jr Super -Statistikprogr. 
ein -Statistil ann 
nit bis zu 100 Daten (Balken- ‚Diagrann 
Kuchen-Grafik, Ausdruck) Mur DM 19,98 
Database-64: Öateiveru., bis zu 6808 Da- 
teien, nur DM 14,98, Info gegen 88 Pf. 
HOFFMANN Romain, Mondorferstraße 9 
L-5552 Reich 
Zahlung: Bar, Schecks (+0M 2,58), Post- 
Siro Mr.17689-52 in Luxbg. 
Keine Nachnahne ins Ausland. 


N Er 


VIDEO DIGITIZER 


Neuer Preis 1987 


Eine Super-Weiterentwicklung 

des 1000fach eingesetzten 

PRINTTECHNIK VIDEO-DIGITI- 

ZERS. Mehr Komfort mit mehr 

Software. Jedes Video-Signal 

(auch Kamera + Standbild) laßt 

sich innerhalb von 4 sec. in den Speicher eines Com- 
modore C 64/128 einlesen. Ein Grafikausdruck Ist 
auf praktisch allen Druckern (MPS 801/802/803, 
1525, 1526, RX + FX sowie alle Drucker mit Epson 
Grafik, HR5C, GP80, GP1OOVC sowie in Farbdruckern 
Canon A1210, GP700 und Okidata, etc.) möglich 


AMIGA DIGITIZER 698, — 


Der über 1000x verkaufte Digi-View s/w 
+ color Digitizer mit neuer Hi-Res Color 
Soft 1987. Neu aus USA. 


Digitizer für IBM, Apple, Atari, Macintosh 


8000 MÜNCHEN 40 - NIKOLAISTR. 2 - TEL. 089 / 368197 
KATALOG DM 3,- Tögl. Versand -Telex 523 203d 


= GELD 64/128 Man wählt unter 25 Re- 

u chenroutinen in den Be- 

i reichen: Anlage — Kapital — Vermögensbildung 
— Sparen — Rendite — Lasten — Zinsen — 

= Kredit — Hypothek — Laufzeit — Amortisation 
— Ratenzahlung — Ausdruck vollständiger Til- 

= gungspläne — Abwertung — Nominal-/Effektiv- 
zinsen — Diskontierung — 

EM Devisen — Konvertierung , 


u .. 
= GESCHÄFT 64/128 2:2. 
Auftragsbe- 

1 stätigung — Rechnung — Lieferschein — Mah- 
nung — 6 Briefrahmen m. Firmendaten zur stän- 

MM digen Verfügung (Anschrift, Konten usw., Men- 

iM ge, Preis, Rabatt/Aufschlag, MwSt., Skonto, Ver- 

m Packung, Versand, usw.) Adressen-Listen/Etiket- 
ten — Kein Verbund zu Adreß-, 

" Lager-, Buchh.Dateien . 


= ETIKETTEN 64/128 ©. 
Es gängige Haft- 
m Stiketten-Formate nach Wahl und Auflagebe- 

stimmung, kinderleichte Gestaltung, Ablage für 


TEL. 0222/5973423 - TELEX 112996 


1060 WIEN » STUMPERGASSE 34 


6ZHZLR/TEO AL -Z"WUSIOHNHVE- NETWELIIG ZISZ- MON LOW II W- ZUMIDS 


ÖSTERREICH 


E wiederholten Gebrauch — Adreßetiketten mit 
codierten Kriterien und ea 
dementsprechendem Auszug . 


- Alle Programme in Deutsch 
EEEEEEEEBEEENEEEEEEE 


GAMESOFT Inh. Karl-Heinz Mund 

Kastellstr, 4, 6455 Erlensee 
Jetzt neu: Laden in 6450 Hanau, Hospitaistr. 6, 06181/252381 
Gesch.-Zeiten: von 10- 18 Uhr werktags, 10- 13 Uhr Samstag 


Direkt aus Amerika! Sofort lieferbar! 
c64 


Wizard's Crown . 
Ring of Zilfin 
Imperium Galactum .. 
Shard of Spring ... 
Kampfgruppe .. 

Star Track Adv. 

PHM Pegasus . 

Up Periscope ... 
Atari XL 
Kampfgruppe 
Imperium Galactum 
Phantasia 
Battle of Antinam 
Wizard’s Crown ..... 


Amiga 


Kampfgruppe ...... 
Feary Tale Adv. ... 


Bitte unbedingt Computertyp angeben! 


Wir führen auch Software für IBM, Atari ST und Amiga. Für 
alle Computer: Jede Menge Anwenderprogramme + viele, 
viele Spiele mehr. Lieferung per NN + Porto DM 6,50 


Computerservice 
Tino Hofstede 

An der Windmühle 
5010 Bergheim 5 


2076 


Adresaverwal 


x 
* 
[ eo“ 
Videoarchiv ““ = u 


Programmintalog genen ? mal #0 Pf in Niriefnarken 


KOSMOGRAMM 64/128 :: = 


rufs- und Hobby-Astrologen — Nach Eingabe MM 
von Geb.ort (geogr. Lage) und Zeit werden er- I 
rechnet: Sternzeit, Aszendent, Medium Coeli, gg 
Ephemeriden, Häuser n. Koch/Schäck — Ausga- = 
be allgem. Persönlichkeitsbilder DM 
— Ausdruck auf 2 DIN-A4-Seiten 


CASINO-ROULETT 64/128 = 


Mit Schnellsimulation, Chancentest, Sequenzen- 5 
verfolgung — Kapitalbedarfsrechnung — Ge- = 
winnplan — Häufigkeitsanalyse — macht den 
Anfänger zum 
Routinier 


usw. usw. — Fordern Sie mit Freiumschlag unsere Liste anl 
Im Computer-Center oder bei uns zu obigen, unverbindlich empfoh- 
lenen Preisen + DM 3, - bei Vorkasse oder DM 4,70 bei Nachnahme 


Am Schneiderhaus 17 » D-57680 Arnsberg 1 MM 
- Tel.02932/32947 MI 


Lernheiter 19,50 DM 
Liga3.t 29,50 0M 
Maschinenkurs {n. 128er).39,50 DM 
Master-Compressor V3.1..49,50 DM 
Mexico 86. 19,50 DM 
Moneytrans 64 29,50 DM 
Moneyirans 128 (1. 128er).39,50 0M 
Nau-Mau 

Pios-Basic 1520 

Prot. Brock 

Profi 40 {nur 128er) 

Rechnung (nur 1. 128er) 

Rule The Worid. hi 
Sammlung 1-5, 7.......je 9,50 0M 
Sammlung 5 (nur 128er)...19,50 DM 
Schacharchiv...... 

Seeweg nach Osten 

Sex-Games 

Siggl’s Kabbala. 

Sprite Creator 

Sprite Genie. 

Speiseplanerstellung 


Adressen (nur 1. 128er):..39,50 DM 
Akropolis 9,50 DM 
Alsiern 14,50 DM 
ASI Planet des Todes...... 14,50 DM 
Bundesliga {nur f. 128er).19,50 DM 
Bundesliga Live 29,50 DM 
Brieimarkenverwaltung...14,50 DM 
Castie ’ 29,50 DM 
Character-Generator 19,50 DM 
Chemie (nurf. 128er)......39,50 DM 
Chemiepauker. 9,50DM 
Chemie-Trainer 39,50 DM 
Crab 29,50 DM 
Cono’s Factory 29,50 DM 
Cosmic Meals. 14,50 DM 
Cup Leader 19,50 DM 
Dis-Dis 19,50 DM 
Disketlenverwaltung. 14,50 DM 
Disk-Manager {nur 128er) 9.50 DM 
Elektro 1 5,00 DM 
Fastword 9,50DM 
Geopoli 14,50 DM 
6rafik (nur t. 128er}.......19,500M SPEISEPLANERSTELLUNG 5.00 DM 
Great Master. .» 8,95DM Stock-Jobber 5,00 DM 
Hard-Copy 801+ 19,50 DM Synonymus... 14,50 DM 
Hacker 128 (nur 128er)...19,500M Terminkalender (128er)...19,50 DM 
Knittel 64 9.50DM Wu 

Krimistunde (nur 128er).. 9,50 DM Videothek (nur 128er) 
Latino. 9.95 DM Wall Street (nur 128er).. 


Kostenlosen Katalog anfordern! 
24 Stunden automatische Bestellannahme: 


9.50 0M 


Tel.0 82 36/8 82 


= Soft & Hardwarevertrieb Scheiba 


8901 Dinkelscherben 


n Talstr. 26 
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WAS GIBT’S WO? 


AMIGA. 


UI TILL TIE> 
en 
Chid 1 MB Fastram ... 
Cltd 20MB Festplatte... 
Imprint u. Palette (Kammerastation f.AMI 
Enı 


—8,6.x 10. Fotos, 8 8,6 x 10,8 Overheadfolien.. 
MS3,5'' NEC/1036 A Ilverst. Schreib/Lesekopf 
Dr PALN Dvideo I. 


AnecC Commercial . 

video LOFR Pudelmangager (Ergebnisverw. f. Kegelvereine) 
NEU! Genlock AB600 m. eig. Stromvers. u. dt, Anleitung 
für AMIGA 1000 und AMIGA 2000 


Ornoal-i 
FIEDLERSTR. 22-32, 3500 KASSEL, ® 0561/1 46 49 


Commodore Service 


—n HARD & SOFT DEMO-DISK gegen DM 5,— im 
FA Brief (Schein 0. Marken) 0. KtNr. 1951 623 
U 


Stadtspark. Kassel BLZ 520 501 51 


Diskette no-name MD 1D5W'' 
Diskette no-name MD 2 D 514" " 
Diskette MEDIA MTL 2 DD 544° * 
Diskette no-name MF 2 DD 3v:' ' 
Diskette Maxell CF 2D3"* 


Thomson Monitor CM 36512 
— Color-Monitor 14", AGB, mit Ton 
40/80 Zeichen 
Daewoo DM 120 
— 12°’ ,18 MHz, 80 Zeichen 
ker 


STAR NL 10 mit Interface 
General Electric 


Pr am- xmoZ— >> 


Thermodrucker, arbeitet auch mit Normalpapier 
Farbbandcassette für General Electric Drucker 
Panasonic KX-P 1092 

sticks 
Competition Pro 5000, transparent 
Quickshot Ilturbo, mit Microschalter 


Diskettanboxen 
DD 100 Ablage 100 Disketten 5%’ ” mit Schloß 
$$ 50 Ablage 50 Disketten 3 oder 34 * mit Schloß 


Zubehör 

Kabel für Monitor 40/80 Zeichen umschaltbar 
Staubschutzhaupte für C 64 

und Tastaturabdeckung für C 128 und 128D 
Ram-Erweiterung C 16/C 116 auf 64 Kohne löten 
Computer- und Druckertische auf Anfrage 
Lieferung ab Lager unfrel 


DPD am—- xmoZ— 


TERRA IMPEX 


Suegbert Wortmann + Hüblkaust 


DM 74,90 


Preise gelten für 10-er Pack; Mindestabnahme 50 Stück 


DM 798,00 


Sonderpreis DM 179,00 


DM 678,00 


— 3 Schnittstellen durch Interfacebox, Centronicausgang Atari XL, 
Commodere VC, 50 Zeichen/Sekunde. NLO und graphikfähig, 


DM 378,00 
DM 19,90 
DM 948,00 


DM 38,90 
DM 29,90 


DM 14,90 
DM 15,90 


DM 34,90 


DM 9,90 
DM 69,00 


TERRA - SECHERT WORTMANN 
Arc dar Maike 7; Posafach 1129-4#7I Musimarıt 
Telelon OSP64/ 2314 Telem 344 MS surra d 


® 
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STEUERN - MESSEN - REGELN 
mit C 64/C 128 oder PC (ab Jan. 1987) 
für Hobby, Ausbildung u. profession. Einsatz! 


or Eingänge ( max 
£ ılen, Digitale aa 
Eingänge (8- < 
und Analoge S- 
erten, v x 


Fordern Sie bitte kosten S€ Unterlage 


MANFRED KÜHN Dip 


Ingenieurbüro für Mikr ektronik-Ar ndung 
Friedrich-Ebert-Allee 61 2000 Schenefeld 
Telefon 040 - 830 87 38 


Pr 
<> Jekalt 
> GEeKRaUoNn 
NW 

lernsoftware 

Lernen Sie spielend Sprachen 
Professionelle Programme für Schüler und Eltern. Vers. 4, 
erweitert und überarbeitet. Mit neuen Programmen und 
noch mehr Lernmöglichkeiten. Für C64/C128 auf Disket- 
ten. Jeder Sprachlehrgang besteht aus jeweils 3 Pro- 
grammdisketten mit je 1000 verschiedenen Vokabeln 
Test I und II Anfänger, Test Ill Fortgeschr. Englisch Idiome 
— je 600 Redewendungen/Progr 
Englisch Test I, Il, Ill + Englisch Manager 
Englisch Idiome I, Il, Ill, IV (Redewendungen) 
Englisch Nautics I, Il, Ill (für alle See-Fans) 
La France Test |, Il, Ill 
Spanisch Test I, Il, Ill 
Italiano Test I, Il, II 
Dänisch Test I, Il, Ill 
Latein Test I, Il, Il 
Jedes Programm ist ca. 100 KB stark, hat Umlaute nach 
deutscher Tastatur, Diskmenü, Druckmenü, Korrektur, 
Testauswertung und ausführliche Anleitung. Info gratis. 
Bestellservice auch telefonisch von 9-21 Uhr 
Preise je Progr.: 39,- DM, 3 Stck. 109,- DM, jedes weitere 
35,- DM/Stck., zzgl. NN + Porto 
dekatron, Postfach 1263, 6103 Griesheim 
Tel. 06155/61874, Tx 4197213, Fax 06155/6832 


= [4 
Was gibt’s wo? 
Auf diesen Seiten können Sie unseren Lesern Ihr Angebot 
bestens präsentieren. 


Die RUN-Leserbefragung hat gezeigt, daß rund 85% der Leser 
die Anzeigen beachten und vor allem 68% Lösungen ihrer 
Probleme in Anzeigen suchen. Wenn unsere Leser also fragen: 
„Was gibt's wo?“, sollten sie doch auch Ihr Angebot in dieser 
Rubrik finden. Mindesteintrag 3mal, pro Schaltung DM 420,—. 


Ecosoft Economy Software AG 


Kaiserstraße 21, D-7890 Waldshut, Tel. 0 77 51-79 20 
Casa Carina, CH-6981 Astano, Tel. 0 91-73 28 13 


Prüf-Software und 


Frei-Programme (fast) gratis 


Stark erweiterte Kollektionen deutscher 
und englischer Programme: |BM: 1250 
Disks, C64: 360 Disks, C128: 35 Disks (inkl. 
CP/M), Atari ST: 220 Disks, Amiga: 160 
Disks, Apple Il: 260 Disks, Macintosh: 335 
Disks. Sonderkollektionen. 


Katalog auf Disketten und 1 Diskette 
mit 10 beliebten Programmen DM 10,- 


(Bitte Banknote oder Scheck beilegen.) 
Bitte unbedingt Computermarke und 
Modell angeben. 


Neu: Fremdsoftware-Emulation auf Ihrem 
Computer: z.B. MS-DOS auf Amiga, 
Macintosh auf Atari ST, C64 auf Ami- 
ga, Apple Il auf Macintosh, usw. Aku- 
telle, detaillierte Info.-Schrift gratis. 


könnte Ihre 
Anzeige stehen. 


Rufen Sie 
einfach an. 


Telefon: 
089/3 60 86-201 


Wir beraten Sie 
gerne! 


SPIELE @\ 


Kurz getestet 
Was gibt’s neues auf dem Markt? 


Aktuelle Spiele 


Lösungshilfen zu Adventures 


DEFENDER 
DF THE GROWN 


HlbH 
FRONTIER 


Activision 


olMMER 
DIYMPIADE 


su BD SPIELE 


LAST NINA 


“== 7 71 GEWINNEN 
.. „sind zu gewinnen Teilnahmebedingungen und Coupon 
auf Seite 147 3 


olART FREI 


Wir haben einen Extra- 


Spieleteil eingerichtet, 
Regelmäßig veranstalten 
wir darin einen Wettbe- 
werb, der extra auf der Ti- 
telseite angekündigt wird. 
Wer an der Verlosung teil- 
nehmen möchte, macht 
einfach bei der Leser-Hit- 
parade mit: Lieblingsspiel 
auf dem Coupon angeben, 
auf eine Postkarte kleben 
und in den Briefkasten da- 
mit. Zusätzlich einige Sei- 
ten mit aktuellen Spiele- 
News und Kurztests. Aus- 
führliche _Spielebespre- 
chungen bekommen je 
eine halbe, ganz feine 
Spiele eine ganze Seite. 
Eine Zehnerskala löst das 
alte Bewertungssystem ab, 
„10“ ist die beste Note. Im 
Bereich Spieletips gibt’s 
Adventurelösungen, Kar- 
ten, Pokes und allerlei 
Kniffe. Also: Viel Spaß 
beim Lesen! 


(cb) 


== spe 


Neue Spiele- 
compilationen: 


Eine Spielecompilation mit 
dem Namen THE B.A.C.K. 
PACK wird in Kürze für den 
Commodore 64 erscheinen. 
Auf der Kassette bzw. Dis- 
kette werden zehn Spiele un- 
terschiedlicher Firmen ver- 
öffentlicht, um den Markt 
ein zweites Mal zu erobern: 
„Xeno“, „Barry McGui- 
gan’s Boxing“, „Deactiva- 
tors“, „Bounces“, „Spindiz- 
zy“, „Monty on the run“, 
„Starion“*, „Bounty Bob 
strikes back“, „Skyfox“ und 
„Elektra Glide* sind auf 
dem Sampler zu finden. An- 
gaben über Preis und Ver- 
trieb liegen uns noch nicht 
vor. 


Unter dem Namen „Lucas- 
film Games — 4 Greatest“ 
bietet Activision die vier Lu- 
casfilmhits „Ballblazer“, 
„Rescue on Fractalus“, 
„Ihe Eidolon“ und „Koro- 
nis Rift“ an. Der empfeh- 
lenswerte Sampler für C64- 
Kassette und Diskette kostet 
ca. 34,95 bzw. 49,95 Mark. 


Elite wartet ebenso mit einer 
neuen Kompilation auf. 
„Trio Hit Pack“ enthält Spie- 


le, die bisher noch nicht für 
den C64 veröffentlicht wur- 
den: Die im Kabelfernsehen 
gesendete Serie über den 
Hubschrauberpiloten Hawk 
inspirierte Elite zu dem er- 
sten Spiel „Airwolf II“ auf 
der Kompilation. Allerdings 
ist dieses Spiel grafisch miß- 
lungen. „Cataball“ ist ein-lu- 
stiges Hüpfspiel mit bunten 
Bällen vor einer grafischen 


Landschaft. „Great Guria- 
nos“ ist ein Ritter-Kampf- 
spiel. Alle drei Spiele sind 
zum Preis von 29,95 Mark 
auf Kassette und 39,95 


Mark auf Diskette erhält- 
lich. 


Low Budgets: 


In der Billigspielserie Silver 
199 Range von Firebirdsoft- 
ware sind „Realm“, das Ab- 
schießspiel „Denarius“* und 
der Sportspielklassiker „De- 
cathlon“ erschienen. 


Von Bug Byte gibt es jetzt 
ein neues Spiel, bei dem der 
Spieler in die Rolle eines Fo- 
tografen schlüpft. Master- 
tronic bringt den Nachfolger 
des Low-Budget Hits „Kick- 
start“ mit Namen „Kickstart 
II“ auf den Markt. Alle fünf 
Programme sind für den 
C64 zum Preis von 9,95 
Mark auf Kassette erhält- 
lich. 


Low-Cost-Software für den 
Amiga war lange Zeit ein 
Stiefkind im Vergleich zum 
Angebot für den C64. Für 
schmalere Geldbeutel gibt es 
neuerdings „Mindbreaker“, 
„Shouting Star“, „Pacboy“, 
„Space Fight“ und „Rocket 
Attack“; sie werden von 
Rushware vertrieben. Je- 
weils 29,95 Mark kosten die 
fünf Spiele beim Händler. 


„Sky Fighter“ heißt das neu- 
ste Schießpiel von Rainbow 
Arts für den Amiga (Preis 


59 Mark). Der Spieler soll, 
so besagt die Verpackungs- 
aufschrift, in den Sky Figh- 
ter einsteigen und dann mit 
dem Raumschiff über eine 
Planetenoberfläche düsen. 
Digitalisierte Spitzen-Sounds 
machen das Spiel bestimmt zu 
einem Erlebnis. Einen aus- 
führlichen Testbericht in der 
nächsten RUN. 


„Slap Fight“, Imgagine’s 
neues Abschießspiel für den 
C64, könnte man in die Rei- 
he „Wie ahme ich Terra Cre- 
sta nach?“ einordnen. Ima- 
gine gelang der Remake 
recht gut. Inhalt: Während 
des Fluges über einen Plane- 
ten müssen Aliens abge- 
schossen werden. Nach je- 
dem Treffer erscheint ein 
Stern auf dem Bildschirm. 
Der Spieler sammelt die 
Sterne auf und gewinnt da- 
durch an Energie und Feuer- 
kraft für sein Raumschiff. 
Ein süchtig machendes Ab- 
schießspiel! 


„Barbarian“ von Psygnosis ist 
ein hervorragendes Abenteu- 
erspiel für den Amiga. Duelle 
mit Rittern sind genauso all- 
täglich wie lebensgefährliche 
Kämpfe mit wilden Tieren. 
Das perfekte Abenteuer. 


Das wohl einfachste Adven- 
ture für den C64 ist „Mik- 
key’s Space Adventure“ von 
U. S. Gold. Der Abenteurer 
kann ständig zwischen ver- 
schiedenen Situationen mit 
den Cursortasten wählen. 
Ursprünglich wurde es für 


amerikanische Kinder im 
Vorschulalter konzipiert. 
Doch hier in Deutschland 
wird die Neuauflage des 
schon 1984 veröffentlichten 
Programms unter den 
Mickey-Mouse-Fans viele 


Anhänger finden. Preis: 38 
Mark (Diskette). 


Activision arbeitet mit „Last 
Ninja“-Hersteller Systems 3 
an der Realisation des Spiels 
„Predator“. Ein Abbild Ar- 
nold Schwarzeneggers wird 
die Hauptrolle dieses Spieles 
übernehmen. Erscheinen 
wird es voraussichtlich im 
Dezember dieses Jahres. 


Ocean lud bisher nur in Eng- 
land zum Kampf gegen die 
mutierte Bedrohung. Jetzt 
ist „Mutants“ endlich auch 
in Deutschland erhältlich. 


Activision plant zwei Strate- 
giespiele für den C64. Bei 
„High Frontier“ ist der 
Spielgegenstand die umstrit- 
tene  Verteidigungspolitik 
unserer Zeit. Der Spieler 
muß das nukleare Inferno 
von der Welt fernhalten. 
Zweifelsohne eine schwieri- 
ge Aufgabe. Das zweite 
Strategiespiel, „Guadeca- 


= | spp 


nal“, bezieht sich auf die 
Schlacht 1942 um die Gua- 
decanal-Insel zwischen Ja- 
pan und den USA. Der Spie- 
ler hat die Wahl, sich mit 
den amerikanischen oder ja- 
panischen Streitkräften zu 
identifizieren. Das Spielziel 
liegt darin, die Insel unter 
militärische Kontrolle zu 
bringen. 


„Bounder“ ist wieder da! 
Gremlin Graphics veröffent- 
licht den Nachfolger von 
„Bounder“ mit dem sehr 
kreativen Titel „Re-Boun- 
der“. Der Spieler hat wieder 
einen Tennisball über eine 
Reihe von Hindernissen zu 
steuern. Diesmal liegt beim 
Spiel aber kein Horizontal-, 
sondern ein Vertikalscrol- 
ling vor. Etwas Variation 
muß sein. 


Wen reizte es nicht, einmal 
mit dem Ferrari F1/16 über 
die Rennstrecken von 
Monza, Monaco oder 
Brands Hatch zu rasen? 
Dazu braucht man keinen 
eigenen Ferrari für 350 000 
Dollar mehr: Mit dem neuen 
Actionspiel „Ferrari For- 
mula One“ von Electronic 
Arts und dem Amiga geht’s 
ab! 16 berühmte Strecken 


warten. Schalten, Instru- 
mente einstellen, Reifen, 
Motorversionen austau- 


schen. Man wird ins Spiel 
geholt, vor technische Pro- 
bleme gestellt, bis zu sieben 
Gegnern ausgesetzt. Sound 
und Grafik krönen das Gan- 
ze. Mit mindestens 512 KB 
Arbeitsspeicher ist jeder mit 
am Start. 


WERT HERENNE FRA EFEEASEDSC OHNE 


Von Ariolasoft kommt auch 
„Deadringer“, das vom Her- 
steller als ein 3-D-Welt- 
raum-Rennen für Joystick- 
artisten mit blitzschnellen 
Reaktionen bezeichnet wird. 
Das Spiel ist zwar schnell, 
dafür sind die Grafiken je- 
doch nicht gut gelungen. 
(Preise: 14,95 Mark Kasset- 
te/ 24,95 Mark Diskette). 


Rainbow Arts wartet mit ei- 
ner großen Zahl von Neuer- 
scheinungen auf. Als Vorlage 
für „80 Days around the 
world“ dienste der gleichna- 
mige Roman von Jules Verne. 
„80 Days around the world“ 
wird ausführlich in der näch- 
sten RUN besprochen. Bei 
den Spielen „Volleyball Simu- 
lator“, „Down at the trolls“, 
„Great Gianna Sisters Giant 
World“, „Graphity Man“ 
und „Hollywood Classics“ 


stecken die Rainbow-Arts- 
Programmierer noch mitten 


in der Arbeit. Die Konzepte 
sind schon fertig; das interes- 
santeste hat „Hollywood 
Classics“: Der Spieler sitzt im 
Kino, kann zur Leinwand ge- 
hen und die Handlungen von 
sechs bekannten Hollywood- 
Filmen nachspielen. Alle 
Rainbow-Art-Spiele gibt es 


bald für C64 und Amiga. 
(Preise: Amiga 59 Mark; 
C64-Kassette 39 Mark, Dis- 
kette 49 Mark). 


Die neuesten Spiele von 
Epyx sind „Sub Battle Simu- 
lator“ (U-Boot-Simulator), 
der Worldgames-Nachfolger 
„California Games“, „Street 
Baseball“, „Street Sports 
Basketball“, „Red War- 
rior“, „Jet Combat“ und 
„Omniceron“. Diese Pro- 


gramme werden ebenfalls in 
einer der nächsten Ausgaben 
besprochen. 


Außerirdische besitzen die 
Frechheit, erdeigene Plane- 
ten zu besetzen. Wo gibt es 
denn so was? Natürlich im 
neusten C64-Spiel von Quik- 
silva „Sector 90“. Keine 
Angst, diese Planeten blei- 
ben in irdischer Hand, denn 
dank des Spiels hat jeder Er- 
denbewohner die Chance, 
sich der Verteidigung anzu- 
schließen. Eine Elitekampf- 
truppe wird die Außerirdi- 
schen mit einem Überra- 
schungsangriff zur Kapitu- 
lation zwingen. 

Sie sind mit dabei, wenn Sie 
29,95 Mark für die Kassette 
oder 39,95 Mark für die Dis- 
kette ausgeben. 
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Bestellschein 


sfr. 14,—: 68 110,—; L hl 17,—; Fmk 48,—; Lire 13 500 T 
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Accessoires 
dominieren 


Das Spiel mit den originell- 
sten Accessoires ist „Chal- 
lenge of the Gobots“ von 
Reaktör. Neben der Diskette 
wird eine Musikkassette mit- 
geliefert, auf der, mit Syn- 
unterlegt, 


thesizerklängen 


— | smHr 


die Geschichte der Gobots 
(leider nur in englischer 
Sprache) erzählt wird. Die 
Programmdiskette enthält 
außer dem eigentlichen Spiel 
einen Computerroman, den 
man vor Beginn des Spiels 
durchlesen sollte. Man kann 
hier mit dem Joystick ein 
Menü anklicken und so die 


Ballerspiel mit Verwandlungskünstlern 


illustrierten Textseiten von 
oben in den Bildschirm zie- 
hen. Dieser Computerro- 
man, in dem man über das 
traurige Schicksal der Go- 
bots lesen muß, ist vollstän- 
dig ins Deutsche übersetzt 
worden. Die Gobots sind 
übrigens eine Art Roboter, 
die sich, ähnlich wie „The 
Transformers“ von Ocean, 
in verschiedene Dinge ver- 
wandeln können. Kurz be- 
vor dieser Testbericht ent- 
stand, schickte Ariolasoft 
einen Gobot in die Redak- 
tion. Auf den er- 
sten Blick sah er wie ein 
Spielzeugroboter aus, doch 
nachdem Siggi ein bißchen 
an ihm herumspielte, wurde 
ein kleiner Lastwagen dar- 
aus. Haben sie schon mal 
eine Redaktionsassistentin 
auf dem Fußboden spielen 
sehen? Alle Accessoires zu 
Challenge of the Gobots 
sind unterhaltsamer als das 
Spiel selbst. Man fliegt, wie 
zu alten Defender-Zeiten, 


von links nach rechts über 
den Bildschirm, schießt eini- 
ge böse Feinde ab und sam- 
melt zwischendurch Roller- 
Klones ein (was immer das 
auch sein mag). Der Sound 
ist ordentlich, die Explosion 
des Raumschiffs eine grafi- 
sche Meisterleistung, doch 
mich macht die Spielidee 
und der Schwierigkeitsgrad 
müder als jede Schlaftablet- 
te. 


(cb) U 


Name: Challenge of the Gobots 


System: C64 

Preis: 29,95 Mark Kass./39,95 Mark Disk, 
Hersteller: Reaktör 

Vertrieb: Ariolasoft 

Spaß: ... 

Grafik: .„....,. , 
Sound: ...„...u.u.. 
Idee: .„....... 


Schwierigkeit: .. 


Breakout ist 
(schon) 
wieder da 


Der Akteur des Computer- 
spiels „Jinks“ sieht sich auf 
den Planeten Atavi im inter- 


Jinks: Die Mauer muß weg. 


galaktischen Sonnensystem 


versetzt. Mit Hilfe einer 
Sonde, die durch einen 
Raumgleiter unterstützt 


wird, soll er alle technischen 
Geräte auf dem Planeten 
einsammeln. Die Sonde 


sieht aus wie ein kleiner 
Ball, der Raumgleiter ähnelt 
eher einem Schläger, den 
man über den gesamten 
Bildschirm und darüber hin- 
aus (Scrolling) mit dem Joy- 
stick steuert. Der kleine Ball 
(Sonde) muß mit dem Schlä- 
ger auf verschiedene Punkte 
(technische Geräte) geschos- 
sen werden; sind alle Punkte 
getroffen, geht’s im näch- 
sten Level weiter. Die Kugel 
kann durch Magnetfelder, 
Sümpfe und andere Widrig- 
keiten vom Weg abkom- 
men. Grafisch kann Jinks 
nicht mit den anderen Rain- 
bow-Arts-Produkten kon- 
kurrieren, der Sound ent- 
spricht aber dem Standard 
dieser Firma: superhypera- 
strospitzengut. Etwas des- 
orientierend wirkt der mit 
Elementen vollgepfropfte 


Bildschirm; Objekte heben 
sich kaum noch von der 
Hintergrundgrafik ab. Für 
die Originalität beziehungs- 
weise Spielidee gibt es Punkt- 
abzüge, weil „Jinks“ ledig- 
lich das mittlerweile schon 
recht abgegriffene Break- 
out-Thema wieder aufgreift. 


(cb) U 


Name: Jinks 

System: C64/ Amiga (demnächst) 

Preis: 39,95 Mark Kass./49,95 Mark Disk. 
Hersteller: Time Warp (Rainbow Arts) 
Vertrieb: Rushware 

Spaß: ...... 

Grafik ......». 

Sound: .„....,.... 


Idee: ..... 


Schwierigkeit 
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Autorennen 
auf 
amerikanisch 


Die Programmierer von Ori- 
gin Systems stellen nach 


„Ultima I-IV*“ ihr neuestes 
Werk vor: „Auto Duel“. 

Man schreibt das Jahr 2030. 
Die Ostküste von Amerika 
wird durch gesetzlose Halb- 


&| öPIELF 


starke unsicher gemacht. 
Waffengewalt und gefährli- 
che Autojagden sind an der 
Tagesordnung. Der Spieler 
stellt einen dieser rücksichts- 
losen Fahrer dar. Zu Spiel- 
beginn ist man allerdings 
noch ein unbeschriebenes 
Blatt unter den Gesetzlosen. 
Die Laufbahn zum Super- 
fahrer beginnt in New York 


Auto als Waffe: Im Computer ohne Schaden. 


mit einem Startkapital von 
2000 Dollar. Doch das ist 
nicht genug, um sich auf der 
Straße lange behaupten zu 
können. Das nötige Geld 
wird am Besten in der Arena 
verdient. Dort werden ge- 
fährliche Wagenrennen aus- 
getragen — „Amateur 
Nights“ — an denen jeder, 
der Mut genug hat, teilneh- 
men kann. Als Preisgelder 
sind 1500 Dollar ausgesetzt. 
Doch der Kampf ist nicht 
leicht zu gewinnen. Wird der 
Wagen zu Schrott gefahren, 
muß man die berühmte 
„Hasenfuß-Taktik“ anwen- 
den und zu Fuß aus der 
Arena flüchten. Sind jedoch 
mehrere Runden heil über- 
standen, so kann man sich 
von den gewonnenen Preis- 
geldern in der Assembly 
Hall ein Auto nach den per- 
sönlichen Vorstellungen zu- 
sammenstellen. Bei dem 
Autokauf sollte mit Geld 


nicht allzu sparsam umge- 
gangen werden, da man 
sonst später nur allzu 
schnell von der Straße gefegt 
wird... 

Das Spiel zeichnet sich 
durch eine komplexe Hand- 
lung aus. Zwischenstände 
können abgespeichert wer- 
den. Zu bemängeln ist ledig- 
lich der magere Sound und 
das lange Nachladen wäh- 
rend der einzelnen Spielab- 
schnitte. 

(A. Niedermeier) I 


Name: Auto Duel 


System: C64 

Preis: Disk. 59,95 Mark 
Hersteller: Origin Systems 
Vertrieb: Rushware 

Spaß: ..... 
Grafik .... 

Sound ® 

Idee ...u.u.u... 


Schwierigkeit: weeo90® 


Fast Food 
im All 
Kaum zu glauben: Im 


Universum leben zierliche 
Vögel, die unter dem Namen 
Tasty Space Griffin in vielen 
planetarischen Restaurants 
auf der Speisekarte stehen. 
Da die lieben Vögel als be- 


Wo bitte geht's zu Mac Galactic? 
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sonderer Gaumenkitzel von 
den Allbewohnern geschätzt 
werden, tut man alles, um 
ihre Art zu erhalten. Doch 
den Vögelchen soll es nun an 
den Kragen gehen. Windige 
Geschäftemacher wollen in 
einer Fastfood-Kette Tasty 
Space Griffin anbieten. Die- 
ses tückische Unterfangen 


muß verhindert werden. Ro- 
ver Pawstrong, Held des 
Universums, bekommt den 
Auftrag, alle „Tasties“ ein- 
zufangen, bevor es die bösen 
Konzernbosse tun. Hier 
kann sich der Spieler in der 
Rolle des Helden versuchen. 
Sein Job: Möglichst viel des 
köstlichen Federviehs soll 
auf dem Phantasieplaneten 
erhascht werden. Aber ohne 
Hilfsmittel hat der Held kei- 
ne Chance, denn die laufen- 
den Delikatessen wuseln viel 
schneller als er. Zum Glück 
findet er ab und zu Kisten, 
in denen so nützliche Dinge 
wie Raketen, Anti-schwere- 
Polster und Ähnliches auf 
Verwendung warten. Der 
Vogelsammler muß sich 
ständig mit Essen versorgen 
(notfalls auch mal eines der 
Schutzbefohlenen) um bei 
Kräften zu bleiben. Der 
Held läuft von links nach 
rechts und umgekehrt über 


den Bildschirm, während er 
seine Jagdobjekte immer 
auf dem Radarschirm im 
Auge behält. In wahnsinni- 
ger Geschwindigkeit scrollt 
die Grafik mit. Der Sound 
beim Laden der Kassette ist 
von höchster Güte. „Star 
Pawn“ ist wie die Tasty Space 
Griffins eine Delikatesse. 
Sehr empfehlenswert! 


(cb) O0 


Name: Star Paws 

System: C64 

Preis: 29,95 Mark Kass./39,95 Mark Disk. 
Hersteller: Software Projekts 


Vertrieb: Ariolasoft 


Spaß: ....u.u.s...©. 


Grafik: .......,.—©. 
Sound: ......—,. ,—O—„ 
Idee: .....u.u.u..uu. 


Schwierigkeit: ...... 


Germany 


Rainbow Arts stellte für die- 
sen Testbericht eine Vorab- 
version von „Antics“, einem 
ihrer neuesten Produkte, zur 
Verfügung. „Antics“ ist ein 
Spielesampler, bei dem vier 
ältere Spielideen, der 


Game Pack mit viel Inhalt. 


— | spe 


Hersteller verschweigt es 
nicht in punkto Sound und 
Grafik — an den heutigen 
Standard angepaßt wurden. 
Beim ersten Spiel, „Dulce- 
deo Cogitations“, wird der 
Spieler in die Welt der Zau- 
berer versetzt. Zwei Magier 
kämpfen mit ihren kräftig- 
sten Zaubersprüchen gegen- 
einander (im Klartext: Sie 


ZUPZODBINN 


In 


versuchen sich gegenseitig 
abzuschießen). Neun Hin- 
tergrundgrafiken bilden die 
Basis für das packende Du- 
ell, wobei ein Zauberer dem 
anderen mit jedem Treffer 
Energie abzapft. Sieger ist, 
wer am Ende des Kampfes 
am meisten Energie besitzt. 
In „Elvin“ schlüpft der Spie- 
ler in die Rolle eines Vogels, 
der aus einem Höhlenlaby- 
rinth entkommen muß. 
Einige Hilfsmittel für die 
Flucht sind in der Höhle ver- 
steckt. „Mini-Boulder“, das 
dritte Spiel auf dem Antic- 
Datenträger, ist die 3262. 
Boulder-Dash-Version. 

Die Grafik ist bei diesem 
Spiel recht mißlungen (das 
Spielfeld hat auf einer einzi- 
gen Screen Platz), komfor- 
tabel dagegen ist der Mini- 
Boulder-Editor. „Chipwar“ 
ist eines der originellsten 
Spiele des Samplers. Zwei 
Spieler fliegen durch einen 


Computer und reparieren 
dabei defekte Mikrochips. 
Grafisch sind drei der vier 
Spiele sehr gut gelungen. 
Der Sound ist dank Chris 
Hülsbeck ein wahrer Ohren- 
schmaus; Rob Hubbard hat 
Konkurrenz bekommen. Di- 
gitalisierte Sound-Effekte 
wechseln sich bei „Antics“ 
mit heißen Rhythmen ab. 


Prädikat: Besonders wert- 
voll! 
(cb) U 


Name: Antics 


System: C64 
Preis: 39,95 Mark Kass./49,95 Mark Disk. 
Herteller: Time Warp (Rainbow Arts) 


Vertrieb: Rushware 


Spaß: ......... 


Grafik: .„........ 
Sound: .„....,.—., 0,0. 
Idee: ......uu. 


Schwierigkeit: .... 


Das erste gute Grafikspiel 
auf dem Amiga hieß „De- 
fender of the Crown“. Nach 
Aussage des Herstellers Ma- 
ster Designer ist „Defender 
of the Crown“ kein ordinä- 
res Computerspiel, sondern 


ein Film, in den der Compu- 
terspieler mit dem Joystick 
eingreifen kann. Der Spieler 
findet sich in der Zeit Robin 
Hoods, im 12. Jahrhundert, 
wieder. Seine Aufgabe ist, 
England von den Norman- 
nen zu befreien. Hier muß er 
strategisches Talent auf 
Feldzügen beweisen, Degen- 


— 
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Tata 


Nicht die Grafik des Amiga-Spiels, aber mehr Spielwitz. 


RE NEE E FIIR 


kämpfe bestehen, Ritterbur- 
gen erstürmen und Lanzen- 
turniere gewinnen. 

Die Grafik und der Sound 
waren bei der Amiga-Ver- 
sion so einzigartig, daß man 
eine Konvertierung auf den 
Commodore 64 für fast un- 
möglich hielt. Beim Betrach- 
ten der C-64-Fassung 
kommt man jedoch aus dem 
Staunen nicht heraus — ein 
Lob an das Programmierer- 
team. Die wesentlichen Spiel- 
elemente, Grafiken und 
Sounds sind fast so gut wie 
in der Amiga-Version. Die 
Konvertierung hat gegen- 
über der Originalversion auf 
dem Amiga sogar noch ei- 
nen Vorzug: Sie ist viel 
schwieriger. Ein geübter 
Computerspieler konnte die 
Amiga-Fassung in wenigen 
Stunden durchspielen. Die 
C64-Version durch die Er- 
oberung der drei Norman- 
nenburgen zu gewinnen, 
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scheint unmöglich. Die Mo- 
tivation ist dank des gestei- 
gerten Schwierigkeitsgrades 
recht hoch. „Defender of 
the Crown“ auf dem C64 
macht viel Spaß. Läge hier 
eine neue Idee und keine 
Konvertierung vor, wäre 
„Defender of the Crown“ 
sicher Anwärter für den 
Goldenhit Oktober auf dem 
Commodore 64. (Testexem- 
plar freundlicherweise von 
der Firma Utopia Software 
zur Verfügung gestellt). 


Name: Defender of the Crown 
System: C64 
Preis: 47,— Mark Diskette 
Hersteller: Master Designer Soft 
Vertrieb: Rushware 


Spaß: .v.....,.,.—,. ss 


Grafik .......... 
Sound ......,.—. 


Idee; ..... 


Schwierigkeit: 


\ 
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Auf Ninjas 
Füßen kommt 
das große 
Abenteuer 


System 3, das hochqualifi- 
zierte Programmierer- 
Team, landet nach einem 
letzten Erfolg mit „Interna- 
tional Karate“ wieder einen 
Riesenhit: „The Last Nin- 
ja“. Anzeigen in diversen 
Fachmagazinen signalisier- 
ten ein baldiges Erscheinen 
von „The Last Ninja“. Doch 
aufgrund der Tatsache, daß 
in diesem heißen Action- 
spiel über 1000 Sprites ein- 
gebaut werden sollten, ließ 
schon damals darauf schlie- 
ßen, daß der „Letzte der 
Ninjas“ sobald nicht auf den 
Markt kommen würde. 
Nach einer Entwicklungszeit 
von etwa einem halben Jahr 
war es dann soweit. „The 
Last Ninja“ war fertig. 
RUN testete die Kassetten- 
und die Diskettenversion für 
den Commodore 64. 

Es war einmal vor langer 
Zeit ein mächtiger Shogun. 
Er unterdrückte das Volk 
und preßte ihm hohe Steu- 
ern ab. Alle lebten in Furcht 
und Schrecken vor ihrem 
Herrscher. Allein die Nin- 
jas, eine Gruppe von Elite- 
kämpfern, wagten, sich dem 
Shogun zu widersetzen und 
dem Volk zu helfen. Der 
Shogun aber ließ alle Ninjas 
auf eine Insel locken und 
dort umbringen. So lebte er 
eine Zeit lang in der trügeri- 
schen Gewißheit seiner un- 
angetasteten Macht. Doch 
einer war nicht in die tödli- 
che Falle gegangen: Arma- 
kuni. Er beschließt, den Tod 
seiner Kameraden zu rä- 
chen. Den Shogun und seine 
Mörderbande sollen ihre Ta- 
ten teuer zu stehen kommen. 
Hier kann der Spieler ein- 
greifen und dem tapferen 
Armakuni mit Geschick und 
Joystick zu Hilfe eilen. Auf 
seiner Suche nach dem Sho- 


-MIEMFONKY - 


-COLLECT- 


MOoLDINGO- 


»_ LA51I 


NINJA 


...„ Feinde, wird man auf harte Proben gestellt. 


gun muß er sich durch das 
ganze Land kämpfen. Um 
ihn dabei zu unterstützen, 
haben die Programmierer 
verschiedene Waffen und 
Hilfsmittel in das Spiel ein- 
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gebaut. Ein bißchen Rük- 
kenstärkung dieser Art kann 
der letzte Ninja fürwahr ge- 
brauchen, da ihm immer 
wieder Gefolgsleute des 
Shogun in die Quere kom- 


men. Und das läuft nie 
friedlich ab. 

Sechs Geländeabschnitte 
(sechs Level) muß der Spie- 
ler mit dem letzten Ninja 
durchreiien und durch- 
kämpfen. Häufige Waffen- 
wechsel bringen etwas Knif- 
feligkeit in die Joystick- 
steuerung, denn je nach 
Waffe wird eine der fünf 
Funktionsbelegungen aktiv. 
Sobald diese Routinen in 
Fleisch und Blut übergegan- 
gen sind, sollte man zur bes- 
seren Orientierung auf dem 
weiten Aktionsfeld eine Kar- 
te anlegen und etwaige Waf- 
fen und andere Utensilien 
darauf verzeichnen. Im Auf- 
sammeln dieser Sachen ru- 
hig wählerisch sein; nicht 
alle helfen weiter. Zur Selek- 
tion nutze man die Funk- 
tionstasten. 

Ein hervorragendes Aben- 
teuerspiel, das nicht nur 
knallharte Action bietet, 
sondern auch Orientierungs- 
sinn und strategisches Ge- 
spür verlangt. 
Anspruchsvolle Hintergrund- 
grafik, eindrucksvoller 
Sound, tolle Animation von 
über 1000 Sprites und die 
perfekte Umsetzung der 
Spielidee machen „The Last 
Ninja“ zum Golden Hit Ok- 
tober für den C64. 
Übrigens: Wer zu diesem 
oder jedem anderen Spiel 
wertvolle Tips kennt, sollte 
sie nicht für sich behalten. 


Die Redaktion freut sich 
über jeden Brief. 
(cb) O 


Name: The last Ninja 


System: C64 

Preis: 29,95 Mark Kass./39,95 Mark Disk 
Hersteller: System 3 

Vertrieb: Rushware 


Grafik: ...usuu.u... 


Sound: .v....., . ,—.e 
Idee: ...u.u.u.u... 
Spaß: .v..uu.u.us.u... 


Schwierigkeit: ...usu.u.us... 


Machen 
je Ihr Set 
omplett! 


RUN-Ausgaben. Wer . clever: ist, 
ne jetzt. seine persönliche 
RUN-Sammlung. Denn nunseine 
komplette Sammlung enthält alle 
Themen zum Nachschlagen. So 
schaffen Sie sich ein vollständi- 
ges Archiv, auf das Sie immer 
wieder zurückgreifen können. 


RUN-Sonderhefte. Bestellen können Sie jetzt auch noch folgende 
RUN-Sonderhefte: 

Sonderheft 1/85: 064 Spezial DM 12,— 
Sonderheft 2/85: Sieger-Programme DM 12,— 
Sonderheft 1/87: Tips, Tricks,Listings DM 12,— 
Alle lieferbaren RUN-Hefte und RUN-Sonderhefte finden Sie auf 
der Rückseite der Zahlkarte. Tragen Sie die gewünschten RUN- 
Hefte und Sonderhefte mit der entsprechenden Bestellnummer in 
den Bestellschein auf der Rückseite der blauen Zahlkarte ein. 
Füllen Sie die Zahlkarte aus und zahlen Sie den Rechnungsbe- 
trag beim nächsten Postamt ein. 


Bestellen Sie 
fehlende 
Ausgaben jetzt, 
solange sie 
noch lieferbar 
sind! 
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Geisterjagd 
am Amiga 


Geister, Dämonen und Teu- 
felsköpfe — das sind die fin- 
steren Gestalten, die es in 
„Garrison“, einer Umset- 
zung von Gauntlet auf den 
Amiga, zu bekämpfen gilt. 
Der Spieler kann zwischen 
vier Charakteren wählen, 
um die Monster zu besiegen. 
Als „Elf“ hat man beispiels- 
weise enorme Laufkraft, je- 
doch als Waffe nur Pfeil 
und Bogen zur Verfügung. 
Ist die Spielfigur gewählt, 
gilt es durch ein Labyrinth 
zu einem Ausgang in den 
nächsten Level zu gelangen. 
Die Geister, die versuchen, 
einen aufzuhalten, umgeht 
man am besten, um nicht 
unnötig Zeit und Kraft zu 
verlieren. Vorsicht ist je- 
doch bei den unsichtbaren 
Geistern geboten. Sie treten 
überraschend aus dem 
Nichts auf die Spielfläche 
und versuchen, einem sofort 
den Garaus zu bereiten. Fast 
alle Geister, wie Teufel oder 
Dämonen, entstehen aus 
Zaubersteinen und treten ab 
und zu scharenweise auf. 
Will man die Geister auf ge- 
schickte Art und Weise los- 
werden, so vernichtet man 
die Steine. Diese finsteren 
Mächte sind zwar alle sehr 
dumm und ungeschickt, 
doch erweist sich das nicht 
als Nachteil, da in den höhe- 
ren Levels so viel Action ge- 
boten ist, daß dies nicht wei- 
ter stört. Unterwegs sollten 
alle herumliegenden Gegen- 
stände eingesammelt wer- 
den. So finden sich immer 
wieder Smartbomben, Nah- 
rung für den hungrigen 
Kämpfer oder auch Schlüs- 
sel, mit denen sich die Türen 
und Wände öffnen lassen. 
Es müssen sich immer genug 
Schlüssel im Besitz der 
Spielfigur befinden, da sie 
sonst sehr schnell Gefahr 
läuft, in einem Level stek- 


“u” GAME QVER 
PRESS 
CONT TUE 


Das Labyrinth im 1. Level 


Hier geht es dämonisch zu. 


kenzubleiben. In den höhe- 
ren Ebenen schließlich kann 
sich nur derjenige behaup- 
ten, der auch die verschiede- 
nen Zaubersprüche richti 

einzusetzen weiß... Die 
Grafik des Spiels läßt nichts 
zu wünschen übrig. Die Ani- 
mationen sind perfekt und 
ausgefeilt — es entsteht der 
Eindruck fließender Bewe- 
gungen. Der Spieler sieht 
das Spiel aus der Vogelper- 
spektive, so daß immer ein 
relativ großer Ausschnitt des 
Spielfeldes auf dem Bild- 
schirm erscheint. Der Sound 
beschränkt sich — bis auf 
eine schöne digitalisierte 
Titelmelodie, die etwas 
mehr bietet — nur auf akusti- 
sche Nebeneffekte. So hört 
man zum Beispiel, wenn ei- 


ZORFISON 


un 


SPACE TO 


316133 DNOEBSO Diniza 


Harrior 


bonano Dooasos 


nem der Dämon Lebens- 
kraft stiehlt, oder die Spiel- 
figur einem Geist zu nahe 
kommt. Insgesamt gesehen 
ist „Garrison“ eine äußerst 
gut gelungene Umsetzung 
des bekannten Klassikers 
„Gauntlet“, 

(A. Niedermeier) O 


Name: Garrison 


System: Amiga 
Preis: 59 Mark 
Hersteller: Rainbow Arts 


Vertrieb: Rushware 


Grafik: .„......... 
Sound: .. 


Idee: ... 


Spaß: 


Schwierigkeit: ..... 


Wichtig für 
Anzeigenkunden: 


THEMEN- 
überblick 


RUm 


bringt so wichtige 
Themen wie: 


Neueste Informationen 
über Amiga 500 bis 
2000 sowie die klassi- 
schen Commodore Ho- 
mecomputer. 


Objektive Testberichte 
über die passende Soft- 
ware 


Anleitungen zum Erler- 
nen von Programmier- 
sprachen 


Tips für Unterhaltung: 
Spiele, Joysticks 


Aktuelle Messeberichte 


Erfolgreiche 
Kleinanzeigen im 


Ze 


Schiff Ahoi 


Micropose ist eine der Fir- 
men, die kontinuierlich 
hochwertige und intelligente 
Computerspiele auf den 


Markt bringen. Nach dem 
Kampfflugsimulator „Gun- 


ship“, wurde ein Spiel ent- 
wickelt, das nicht aus dem 
Bereich der Kriegsspiele 
kommt: „Pirates“. Das neue 
Produkt wurde in seiner 
englischen Version getestet. 
Die Übersetzung der Pro- 
grammtexte ist in Arbeit, 


Action und Abwechslung verspricht das Piratenleben. 


damit bald auch Spiele- 
freaks, die der englischen 
Sprache nicht mächtig sind, 
„Pirates“ genießen können. 
Der Spieler wird in „Pirates“ 
zum Piratenkapitän, der auf 
unseriöse Weise soviel Geld 
wie möglich scheffeln will. 
Aufregende Fechtduelle, 
Handel in den Häfen, Füh- 
ren eines Logbuchs, Entern 
von Handelsschiffen, Spio- 
nieren, Navigieren in der 
Karibik, Stürme, Riffs, eine 
desertierende Besatzung und 
anderes mehr halten den 
Spieler in Atem. „Pirates“ 
ist eine Mischung aus Ac- 
tion- und Strategiespiel, die 
viel Spaß macht. 

Man kann zwischen ver- 
schiedenen Zeitperioden 
wählen, in denen Piraten- 
tum unterschiedlich ausge- 
prägt war. Ende des 17. Jahr- 
hunderts war das Piratenda- 


sein am schwierigsten, da 
fast alle Städte Armeen auf- 
stellten, um dem Piratentum 
den Garaus zu machen. „Pi- 
rates“ ist ein recht interes- 
santes Spiel mit guten Gra- 
fiken, informativen Texten 
und einem ausgezeichneten 
Handbuch. Aufgrund seiner 
Vielseitigkeit wird es eine 
Menge Anhänger gewinnen. 


(cb) U 


Name: Pirates 


System: C64 
Preis: 49,95 Mark Kass./59,95 Mark Disk: 
Hersteller: Micropose 


Vertrieb: Rushware 

Spaß: ...us...u.u.e.e. 
Grafik: ..su.s.. 
Sound: .... 

Idee: ...u.uus..... 


Schwierigkeit: ...u.u.s 


Der Hauch des 
Todes für den 
64 


James Bond, 007, produ- 
ziert sich wieder auf dem 
Computerbildschirm. Nach- 
dem alle bisherigen James 
Bond-Spiele (Basilion Bond, 
A view to a kill etc.) Flops 
waren, hat Domark endlich 


Mit dem Film kommt das Game. 
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ein Spiel programmieren las- 
sen, das auch Spielern, die 
Wert auf Grafik und Sound 
legen, zusagt. Als Vorlage 
zum Spiel diente der neue 
Bondfilm The Living Day- 
liehts. Bond’s Mission be- 
steht darin, den abtrünnigen 
Agenten Koskov vor KGB- 
Killern, die ihn ermorden 
oder zumindestens entfüh- 


ren wollen, zu beschützen. 
Aber mit der Zeit stellt man 
fest, daß der gute Koskov ei- 
gentlich ein Doppelagent ist, 
der mit dem internationalen 
Waffenschieber Brad Whit- 
caker unter einer Decke 
steckt. Er und Koskov enga- 
gieren einen Killer, der mit 
Kopfhörerkabeln tötet, er- 
würgt. Beinahe wären Bond 
und die schöne Cellistin 
Kara seine nächsten Opfer 
gewesen. Im Spiel kämpft 
sich Bond durch acht ver- 
schiedene Level. Auf allen 
Ebenen kann wild herumge- 
ballert werden. 

Die Grafik und die Anima- 
tion sind im Vergleich zu 
den Vorgängerprogrammen 
besser geworden. Im ersten 
Level, der bei dem Pro- 
grammtest nicht zu meistern 
war, läuft Bond mit einem 
Colt bewaffnet von links 
nach rechts über den Bild- 
schirm und gerät unter Be- 
schuß von Soldaten, die 


plötzlich aus dem Gelände 
auftauchen. Der Spieler be- 
wegt ein Fadenkreuz mit 
dem Joystick in Richtung 
Killer, drückt den Feuer- 
knopf und schon hat Bond 
einen Feind weniger. Pro- 
grammtechnisch ist Do- 
mark’s „Living Daylights“ 
gut gelungen. Wer ein Spiel 
sucht, bei dem man nicht 
viel denken muß, der ist mit 
Bonds neustem Spiel zum 
Film gut beraten. 


(cb) U 


Name: The Living Daylight 
System: C64 

Preis: 29.95 Mark Kass 
Hersteller: Domark 


Vertrieb: Rushware 


Spaß: ...us.u„.u.. 


Grafik: ..sssu.sus.o 


Sound: ...u.u.u.u.>. 
Idee: ......u.s 


Schwierigkeit: .„.u.u.u... 


N 


Auf die Dauer 
hilft keine 
Karate-Power 


Karatespiele erleben schein- 
bar einen Boom ohne Ende. 
Kingsoft veröffentlichte vor 
kurzem „Karate King“ für 
den Commodore Amiga, 
das sich nicht gerade von 


=; 


bisherigen Karatespielen ab- 
hebt. Ein Spieler kann seine 
Karatekünste mit denen des 
spielstarken Computers 
messen. Am meisten Spaß 
macht „Karate King“ aber 
im Kampf gegen einen ande- 
ren Spieler. Es gibt 16 ver- 
schiedene Schlagvarianten, 
um den Energiestreifen des 


Prre To 


aan 


Karate im Bambusdschungel des Amiga. 


Gegners abzubauen. Ziel der 
Kämpfe ist, alle Fighter zu 
besiegen, um in einen sagen- 
umwobenen Palast zu gelan- 
gen. 

Aber es wird zu risikoarm, 
einfach den nächsten Level 
einzuschalten. In höheren 
Spielstufen wird der Spieler 
dem mit Giftpfeilen und 
Shuriken konfrontiert und 
muß geschickter werden. 
Die Hintergrundgrafiken 
sind recht gut gelungen, die 
Animation der Kämpfer läßt 
jedoch sehr zu wünschen üb- 
rig. Sehr echt klingen die di- 
gitalisierten Kampfschreie, 
auch die Titelmelodie läßt 
sich hören und ertragen, 
doch wird der Soundchip 
des Amiga bei weitem nicht 
ausgereitzt. In der Bewer- 
tung der Originalität/Idee 
gab es erhebliche Punktab- 
züge, weil fast alle Elemente 
schon vorhandenen Karate- 
spielen abgekupfert wurden. 


Übung macht den Meister 
— ein Leitspruch, der be- 
sonders für „Karate King“ 
gilt. Bei seinen ersten Kämp- 
fen wird man schon sehr 
bald vom Computerkämp- 
fer zu Boden gestreckt, aber 
nach einigen Stunden vor 
dem Monitor fühlt man sich 
schon als König der Karate- 
kämpfer. Fazit: Nicht 
schlecht, aber es gibt bessere 
Karatespiele (Karate Kid II) 
für den Amiga. 


(cb) oO 


Name: Karate King 


System: Amiga 

Preis: 49.95 Mark Disk. 
Hersteller; Kingsoft 
Vertrieb: Kingsoft 


Spaß: ...u.u.... 


Grafik: .....u.... 
Sound: ....... 
Idee: ..... 


Schwierigkeit: ....u..u.uu». 


Seeschlacht im 
Wohnzimmer 


Als Kommandant eines hy- 
permodernen Kriegsschiffes 
bekommt der Spieler den 
Auftrag, im „Inneren Meer“ 
(wo immer das auch sein 
mag) zu patrouillieren und 
die freie Welt zu beschützen. 


Hinter dieser zunächst 
rühmlichen Absicht steht ein 
Kriegsspiel, bei dem es nur 
darum geht, feindliche Fre- 
gatten, Raketen und Flug- 
zeuge abzuschießen. „Con- 
voy Raider“ verfügt über 
verschiedene Aktionsebe- 
nen, zwischen denen man 
hin- und herschalten kann. 


Strategisches Handeln in kühler Kriegsatmosphäre. 


Vom Kartenraum aus ist es 
möglich, das Meer zu beob- 
achten und die Position der 
feindlichen Schiffe und die 
des eigenen Kreuzers abzu- 
rufen. Der Schiffskompaß 
dient als Hand- und Auto- 
matiksteuerung. Radargerä- 
te überwachen den Luft- 
raum. 

Durch verschiedene Icons 
und die Farben Grün, Gelb 
oder Rot erfährt der Spieler, 
welche Alarmstufe gerade 
akut ist. Je nachdem, ob 
Flugzeuge oder Schiffe den 
Convoy Raider angreifen, 
schaltet der Spieler auf Luft- 
oder Seeraumverteidigung 
um und macht so den Fein- 
den den Garaus. Grafisch ist 
„Convoy Raider“ gut gelun- 
gen, vom Sound bietet das 
Kriegsspiel bis auf einige 
Pieptöne garnichts. Um auf 
unser Bewertungssystem zu 
kommen: Kann ein Kriegs- 
spiel originell sein? Wohl 


seltenst im positiven Sinne. 
Kann jemand an einem 
Kriegsspiel Spaß haben? 
Diese Frage konnte ich bei 
meinem Programmtest nicht 
beantworten. Aus diesem 
Grunde steht im Bewer- 
tungskasten ein Fragezei- 
chen. Was halten Sie von 
Kriegsspielen? Ich würde 
mich sehr über Briefe zu die- 
sem Thema freuen. 


(cb) J 


Name: Convoy Raider 

System: C64 

Preis: 29,95 Mark Kass./39,95 Mark Disk. 
Hersteller: Gremlin Graphics 

Vertrieb: Rushware 

Spaß: N? 

Grafik: .»„....... 


Sound: .. 


Idee: .... 


Schwierigkeit: 
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Rainbow Arts 
läßt die Katze 
aus dem Sack 
„Bad Cat“ heißt das neue 
Geschicklichkeitsspiel für 
den Amiga und Atari ST 
von Rainbow Arts. Bad Cat 
ist eine furchtlose Katze, die 
sich in zahlreiche Abenteuer 


Zuviel Zielwasser getrunken? 


pp 


begibt. So gilt es in der er- 
sten Spielstufe, Wassergrä- 
ben, Mauern und ähnliche 
Hindernisse mit Joystickge- 
schick zu bewältigen. Vor- 
sicht ist allemal geboten! 
Katzen mögen kein Wasser 
und fallen auch ungern von 
Mauern. Was dann aller- 
dings folgt, hat mit norma- 


len Abenteuern nichts mehr 
gemeinsam: Es gilt den 
Hund „Socker“ im Kegeln 
zu schlagen. Die Regeln die- 
ses Spielabschnittes sind je- 
doch ganz witzig: Wer von 
einer Kugel getroffen wird, 
muß sich an der Bar eine 
Halbe Bier zu Gemüte füh- 
ren. Ganz klar, daß betrun- 
kene Katzen mit der Zeit 
nicht mehr so gut kegeln. 

Im Untergrund schließlich 
muß man auf einer Tonne 
durch Abwasserkanäle ba- 
lancieren und aufdringliche 
Ratten austricksen. (Ein Tip 
am Rande: Wer das Licht in 
der Kanalisation einschaltet 
wird sich leichter tun.) Die 
Grafik des Spiels läßt nichts 
zu wünschen übrig. Der 
Sound ist sehr realistisch, 
die Titelmusik in der Atari- 
Version etwas ärmlich. Eini- 
ge Level fordern vom Spie- 
ler hohe Ausdauer, bis er 


das richtige Gefühl für die 
Joystickkontrolle hat. Mit 
„Bad Cat“ ist Rainbow Art 


sein abwechslungsreiches 
und lustiges Spring- und 
Hüpfspiel gelungen. Das 


Spiel wurde in der Atari ST- 
Version getestet, ist aber 
bald auch für den Amiga er- 
hältlich. 


(A. Niedermeier) J 


Name: Bad Cat 

System: Amiga (getestet auf Atari ST) 
Preis: 59 Mark 

Hersteller: Rainbow Arts 


Vertrieb: Rushware 


Grafik: ...u..u..u.uus 


Sound: .„...... 
Idee: ...„.u.u.u... 
Spaß: ....u.u.u..u 


Schwierigkeit: ....... 


Im Grabe des 
Arazok 


In dem Spiel „Arazok’s 
Tomb“ schlüpft man in die 
Rolle eines sensationslüster- 
nen Reporters, der sich vor- 
genommen hat, das Grab 
des Arazok zu erforschen. 
Doch die gute Story, die 
man sich als Reporter und 


Spieler erhofft, muß erst 
hart erkämpft werden. So 
neigt die Spielfigur dazu, 
sich von wilden „Zuds“ er- 
schlagen zu lassen, Klippen 
hinunterzustürzen oder auch 
ziemlich schnell zu verhun- 
gern und zu verdursten, so- 
bald sie nicht umsichtig ge- 
nug ist. Hilfe bieten jedoch 
einige Zaubersprüche, die 


Gewährt die Statue Einlaß in den Hades? 
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im Laufe des Spiels aufge- 
funden werden und mit de- 
nen sich gute Geister be- 
schwören lassen. .. „Ara- 
zok’s Tomb“ hat, wie man 
es inzwischen von Amiga- 
spielen gewohnt ist, hervor- 
ragende Grafiken. Die Be- 
gleittexte erscheinen in ei- 
nem separaten Bildschirm- 
fenster. Befehlseingaben er- 
folgen über die Tastatur 
oder bei Standardbefehlen 
wie „go north“ oder ähnli- 
chem auch mit der Maus. 
Witzig gemacht ist die digi- 
talisierte Stimme, die sich ab 
und zu mit mehr oder weni- 
ger intelligenten Kommenta- 
ren einmischt. Zu bemän- 
geln ist lediglich, daß es sich 
manchmal etwas schwierig 
gestaltet, das Spielgeschehen 
voranzutreiben. Deshalb 
zum Schluß noch ein kleiner 
Tip für Arazok-Neulinge. 
Ganz am Anfang muß man 
nach Norden gehen („go 


north“) — zu einem Hünen- 
grab. Dort steht eine Steinfi- 
gur, die am Gürtel einen 
Edelstein trägt. Um nun in 
die Unterwelt zu gelangen, 
wird folgende Befehlsfolge 
eingegeben: „take jewel 
from the belt“ und „put je- 
wel into the eye of the sta- 
tue“. Die Steinfigur bewegt 
sich nun samt Sockel ein 
Stück zurück und gibt den 
Weg nach unten frei. 


(A. Niedermeier) O 


Name: Arazok’s Tomb 
System: Amiga 

Preis: 97 Mark 

Hersteller: Aesgis 

Vertrieb: Kaufhäuser 


Grafik: ..ussu.u.u... 


Sound: ...u.u.u.u». 
Idee: .».uu.u... 
Spaß: ..... 


Schwierigkeit: 


Road Runner: 
[} 
Das Spiel, das 
.. 
süchtig macht 
Atari Games Corporation, 
der Entwickler von „Gaunt- 
let“, hat gute Arbeit geleistet 
und ein originelles Automa- 
tenspiel adaptiert: Road 


Runner ist derart rasant und 
aufregend, daß ich Mühe 


Wilde Jagd über die Highways. 


— /gppE 


hatte, mich vom Bildschirm 
wieder loszureißen. Wer 
hätte gedacht, daß die 
Flucht vor einem Coyoten 
süchtig machen kann. Die 
wilde Hatz geht über High- 
ways, in Canyons und durch 
Labyrinthe. Der Spieler 
steuert per Joystick den ir- 
ren Vogel auf Rollerskates 
über den Asphalt, während 


der Coyote mit seinem Skate- 
board versucht, sich das flie- 
hende Federtier zu greifen. 
Bei der wilden Hetzjagd 
muß der Vogel Körner auf- 
sammeln, um bei Kräften zu 
bleiben. Ist das ganze Ge- 
treide in einem Spielab- 
schnitt aufgepickt, geht die 
wilde Jagd im nächsten Le- 
vel weiter. Nach meinen 
Kenntnissen verfügt Road 
Runner über 16 Level. Nach 
zwei Nächten und 7 Leveln 
gab ich auf. Es gibt dort eine 
Stelle, an der ich einfach 
nicht mehr weiter kam. 

Das Laden der einzelnen Le- 
vel erfolgt durch einen Dis- 
kettenschnellader. Das 
macht das Spiel komforta- 
bel. Angenehm für Auge 
und Ohr sind Grafik und 
Sound. Das alles motiviert 
über das übliche Maß hin- 
aus. Spannung wird durch 
die unterschiedlichen Szenen 
erzeugt. Felsbrocken, Minen 


und der häufige Wechsel der 
„Fahrzeuge“ des Coyoten 
(Pack, Rakete, Pogo Stick, 
Jet, Skateboard) halten den 
Spieler in Atem. Zum Glück 
gibt es eine Spielhallen- 
adaption von „Road Run- 
ner“ für den Homecompu- 
ter, ansonsten hätte sich so 
mancher Spieletester pleite 
gespielt. 


(cb) O 


Name: Road Runner 


System: C64 

Preis: 29,95 Mark Kass./39,95 Mark Disk. 
Hersteller: US.Gold/Atari Games 
Vertrieb: Rushware 


Spaß: .......... 


Grafik: ......uu> 
Sound: .„.....,.0.. 
Idee: .„.....,.,s 


Schwierigkeit: ....u.. 


FT] TTTTTTTT—T—nL———— 


Rauher Krieg 
der Knöpfe 


„Street Gang“ heißt eines 
der neuesten Spiele für den 
C64 und den Amiga von 
Rainbow Arts. Hier im Test 
die Vorabversion: In seinem 
Geburtsort in einer kleinen, 
verträumten Kleinstadt auf 
dem Lande wäre Mickeys 


Leben friedlich verlaufen, 
aber seine Eltern mußten 
unbedingt nach New York 
ziehen. Da Mickey in New 
York keine Freunde hat, ge- 
sellt er sich zu einer New 
Yorker Straßenbande. Als 
Mutprobe muß er Locke, 
dem berüchtigten Anführer 
einer anderen Jugendbande, 
sein geliebtes Haarbüschel 


New Yorker Banden machen die Straßen unsicher 


EEE N Fresh: 


rauben. Nach dem Laden 
des Titelbildes ertönt sieben 
Minuten lang eine fünfstim- 
mige Titelmelodie, bei der 
digitalisiertte Soundeffekte 
verarbeitet worden sind. Die 
Animation der Figuren ist 
ein wenig holprig, aber an- 
sonsten sind Sound und 
Grafik allererste Sonder- 
klasse. Gegenüber den Prü- 
geleien, die Mickey — und 
mit ihm der Spieler — über- 
stehen muß, waren Bruce 
Lees Auseinandersetzungen 
geradezu läppisch. Zu Be- 
ginn des Spiels hat man be- 
reits alle Hände voll zu tun, 
mit den vielen Gegnern fer- 
tig zu werden. Ob Mickey 
von fanatischen Baseball- 
freaks, entnervten Opas mit 
Schrotflinten oder anderen 
unangenehmen Zeitgenos- 
sen angegriffen wird, alle 
müssen einsehen, daß der 
Spieler am längeren Joystick 
sitzt. Ab und zu erbeutet 
Mickey bei seinem Gemetzel 


Waffen, mit denen er die 
Rowdies außer Gefecht set- 
zen kann. „Street Gang“ ist 
für meine Begriffe zu brutal. 
Grafik und Sound dagegen 
können sich sehen und hö- 
ren lassen. Time Warp 
(Rainbow Arts) ist dabei, 
mit ihrer Qualität in der 
Spieleproduktion an große, 
etablierte Firmen anzuknüp- 
fen. 


(cb) O 


Name: Street Gang 

System: C64/ Amiga 

Preis: 39,95 Mark Kass./49,95 Mark Disk. 
Hersteller: Time Warp (Rainbow Arts) 
Vertrieb: Rushware 


Spaß: ........ 


Grafik: .„........ 
Sound: .„......—. 0... 


Idee: ..... 


Schwierigkeit: 
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C16-Hit: Es 
lebe der Sport 


Udo Gertz, Programmierer 
des 50 000 mal verkauften 
C16-Superhits „Winter 
Olympiade“ ist einer der be- 
sten Spielemacher Europas. 
Aber er ruhte sich nicht auf 
diesen Lorbeeren aus, son- 
dern setzte sich gleich an die 
„Sommer Olympiade“. Ein 
Jahr dauerte es, und der 
nächste Hit war fertig. 

Unglaublich, was Udo Gertz 
einem C16 an Sound und 


A,ÄYTIHT 


Hoffentlich hat er gut gefrühstückt! 


Kopf an Kopf: Strampeln, was das Zeug hält! 


Grafikeffekten entlockte. 
Atemberaubend auch die 
Animation. Kaum vorstell- 
bar, daß es kein C64 ist. 


Dem C64-Sportspiel „Sum- 
mergames“ von Epyx sind 
einige Szenen nachempfun- 
den, so die Eröffnungs- und 
Schlußzeremonie als auch 
manch anderes Detail. Aber 
wen sollte das stören? Den 
C16-Besitzer bestimmt 
nicht. Er hat endlich ein her- 
vorragendes Mehrkampf- 
Sportspiel, zumal „Summer- 
games“ ja nie für den C16 
konvertiert wurde. Hier nun 
Informationen zum Spiel: 


Da werden selbst Fische neidisch. 
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EVENT : TWO-HAND SNATCH 


TRVv i 


Bevor das olympische Spek- 
takel so richtig losgeht, 
nimmt der Spieler an einer 
aufwendigen Eröffnungsze- 
remonie teil. In der „Som- 
mer Olympiade“ wird in sie- 
ben Disziplinen um den Sieg 
gekämpft. Die Athleten 
können sich in der Schmet- 
terlings-Schwimmstaffel, im 
Stabhochsprung und Speer- 
werfen, Tontaubenschießen, 
Turmspringen und Radfah- 
ren als auch im Gewichthe- 
ben messen. Die weniger 
sportlichen suchen sich aus 
dem Hauptmenü nur die be- 
vorzugten Disziplinen aus. 
Nun Namen eingeben und 
ein Land wählen, für das 
man antreten möchte. Je 
nachdem, ob man gerade ei- 
nen Sieg oder eine Niederla- 
ge errungen hat, ertönt die 
Nationalhymne des betref- 
fenden Landes. Bestleistun- 
gen können auf Diskette 
oder Kassette gespeichert 
werden, so daß man mit an- 
deren C16-Besitzern wettei- 
fern kann. Stellt sich kein 
menschlicher Gegner der 
Herausforderung, über- 
nimmt der Computer die 
Rolle der unerbittlichen 
Konkurrenz. 

„Sommer Olympiade“ ist 
eine Augenweide und ein 
Ohrenschmaus, auch Spiel- 
spaß und Motivation kom- 
men nicht zu kurz. Womit 
bewiesen ist, daß dem C16 
nahezu die gleichen Leistun- 
gen abgerungen werden 
können wie dem C64. Es 
sollte in keiner C16-Spiele- 
sammlung fehlen. (cb/ub) [J 


Name: Sommerolympiade 


System: C16/Plus 4/C116 

Preis: 29,95 Mark Kass./Disk. 
Hersteller/Vertrieb: Kingsoft 

Spaß: ..suussa.s.... 
Grafik ...u...,.—oues 
Sound: .»...u.su.s.s... 
Idee: ...u... 


Schwierigkeit ...u.u... 


Papierkrieg 

im All 

Floyd ist wieder da. Endlich 
hat Steve dem Drängen sei- 
ner Fan-Gemeinde nachge- 
geben, die schon seit 1983 
verzweifelt auf ein Nachfol- 
geprogramm zu „Planetfall“* 
wartet. „Stationfall* spielt 
fünf Jahre nach dem fanta- 
stischen Abenteuer auf Resi- 
da. Damals durfte man mit 
seinem treuen Robotkame- 
raden Floyd die Geheimnis- 
se dieser Welt entdecken 
und schaffte es, sie vor der 
Vernichtung zu bewahren. 
Diese heldenhafte Geschich- 
te wird in „Planetfall“ nach- 
erzählt. 

Für diese große Tat wurde 
dem Spieler eine großartige 
Beförderung angeboten, die 
er natürlich sofort akzep- 
tierte. Ade Fähnrich siebter 
Klasse: Jetzt ist man Leut- 
nant erster Klasse. Nie mehr 
Boden schrubben! Endlich 
wird das Leben in der Ster- 
nenpatrouille so, wie es in 
den Werbebroschüren im- 
mer beschrieben wird! 
Denkste! Das einzige, was 
sich im Tagesablauf geän- 
dert hat, ist, daß man lästi- 
ges Herumgeschrubbe gegen 
lästigen Papierkrieg einge- 
tauscht hat. Und jetzt die 
neue „nervenaufreibende“ 
Aufgabe: Kurz mal zur 
Raumstation Gamma Delta 
Gamma 777-G 59/59 rüber- 
sausen und ein paar Anträge 
auf Erteilung eines Antrag- 
formulars zur Bestäti- 
gung... 

Soweit zum Hintergrund der 
Geschichte. Ein besonderer 
Leckerbissen ist natürlich, 
wie immer bei Infocom, die 
Anleitung, die nicht nur aus 
einem Blatt mit einer kurzen 
Zusammenfassung der Ge- 
schehnisse besteht, sondern 
auch noch aus ein paar spe- 
ziellen „Goodies“ (Beilagen). 
In erster Linie sind es auch 
diese „Goodies“, die für den 
verhältnismäßig hohen Preis 


> J OPIELE 


„Stationfall“-Verpackung: Wie ein Weihnachtspaket. 


der Infocomprogramme ver- 
antwortlich sind. Aber es 
lohnt sich! Neben dem wit- 
zig geschriebenen Handbuch 
mit vielen Beispielen, das 
dem Anfänger den Einstieg 
erleichtern soll, befinden 
sich auch noch detaillierte 
Karten von der Raumsta- 
tion, auf der sich die Hand- 
lung abspielt, in der Verpak- 
kung. Falls jetzt diejenigen 
traurig sind, die es lieben, 
komplexe Karten zu zeich- 
nen, kann ich sie trösten, 
denn später, wenn man et- 


was weiter im Adventure 
fortgeschritten ist, geht es 
gar nicht anders, als die drei 
optionalen Module zu kar- 
tographieren. Dem erfahre- 
nen Infocomfan wird beim 
durchlesen der Anleitung 
auffallen, daß keine Liste 
der wichtigsten Wörter, die 
das Adventure versteht, ent- 
halten ist. Wahrscheinlich 
deswegen, weil der Parser 
(Teil des Programms, der 
die Eingaben überprüft und 
auswertet) noch einiges 
mehr versteht als bisher, das 


Here begins a transoript of interaction with STATIONFALL. 


STATIONFALL 


Infocon interactive fiction -- a science fiction story 


Copyright (ce) 1987 by Infocoe, 


ine. All rights reserved. 


STATIONFALL is a tradesark of Infocon, Inc. 


Release 107 / Serial number 870430 


Floyd looks out at you, right through your computer screen. "See that 
copyright notice?” he asks in a defiant tone. "If anyone tries plrating this 


disk, they’ii have Floyd to answer to.” 


>tickie Floyd 


Floyd giggles and pushes you away. "You're tickling Floyd!” He clutches at 
side paneis, laughing hystericaliy. Oil drops stream from his eyes. 


>kick Floyd 


"Uhy you do that?* Floyd whines. "I think a wire now shaken loose.” He goes 


into a corner and sulks. 


>swallov me 


it’s doubtful that yourself would agree with you. 


>grab me 
How romantic! 
Floyd vhisties tunelessiy. 


>unseript 


Floyd nods his approval. "Good idea. Printer paper expensive. Best to savı 


tor important scenes. Not like this one.” 

Here ends a transcript of interaction with STATIONFALL. 
STATIONFALL 
Infocon Interactive fiction -- a science fiction story 


Copyright (c) 1987 by Infocon, 


Inc. All rights reserved, 


STATIONFALL is a trademark of Infocos, Inc. 


Release 107 / Serial nunber 870430 


Floyd looks out at you, right through your coaputer screen, "See that 
copyright notice?” he asks in a deflant tone. "If anyone tries pirating this 


disk, they’'ii have Floyd to answer to.” 


Am besten: Wörterbuch auspacken. 


EEE NETTER ER 


heißt, es wird noch schwieri- 
ger, Wörter zu finden, die 
nicht angenommen werden. 
Natürlich ist dieses interak- 
tive Adventure, wie alle an- 
deren auch, in verhältnismä- 
Big anspruchsvollem Eng- 
lisch verfaßt. Wer nicht über 
solche Englischkenntnisse 
verfügt, muß entweder sehr 
sprachbegabt sein, einen 
schnellen Nachschlagefinger 
für sein Wörterbuch haben 
oder lieber doch mit einem 
besser Englischsprechenden 
zusammenspielen. Meistens 
macht es zu zweit auch dop- 
pelt so viel Spaß, weil man 
sich gegenseitig beim Lösen 
der Teilaufgaben helfen 
kann. 

Zusammenfassend kann 
man sagen, daß diese selbst 
für Infocomverhältnisse 
überdurchschnittlich witzige 
Story jedem Adventurefreak 
zu empfehlen ist, der über 
entsprechendes Englisch 
verfügt. Wenn man erst ein- 
mal begonnen hat, Station- 
fall zu spielen, kommt man 
so schnell nicht mehr davon 
los. Jemand, der Planetfall 
schon kennt erst recht nicht. 
Zu guter Letzt noch ein Tip, 
der hilft, das erste Hindernis 
zu überwinden: Verknitterte 
Formulare sollten mal gebü- 
gelt werden, und beim Her- 
umstöbern in den Räumen 
des  Station-Commanders 
läßt sich auch manch nützli- 
che Sache auftreiben. 


(Stephan Englhart/Andreas 
Paul) O 


Name: Stationfall 

System: alle 

Preis: 79-100 Mark, je nach System 
Hersteller: Infocom 

Vertrieb: Activision 


Spaß: 


.„....,.—.. 
Grafik: keine 
Sound: keiner 
Idee: .„....—. ...» 


Schwierigkeit: .....u.. 
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öPIELETIPS 


Lösungswege zu „Eis und Feuer” für den C64 


Erklärung: Ein — zeigt immer an, wo sich der genannte 
Gegenstand befindet. 


1. Ziel: 


Man benötigt: 
Ort: 
Lösung: 


2. Ziel: 
Man benötigt: 


Ort: 
Lösung: 


3. Ziel: 


Man benötigt: 


Lösung: 


4. Ziel: 

Man benötigt: 
Ort: 

Lösung: 

5. Ziel: 

Man benötigt: 


Ort: 
Lösung: 


6. Ziel: 


Man benötigt: 


Ort: 
Lösung: 


7. Ziel: 


Man benötigt: 


Ort 
Lösung: 


Schwert aus Eis und Feuer > Höhle über 
Talkessel 

Lichtstein > Flugdrachenhöhle 

Höhle über Talkessel 

nimm Schwert aus Eis und Feuer; zeige 
Lichtstein; töte Koloß mit Schwert aus Eis 
und Feuer. 


Amulett — Gruft in Burg 

Ring — Grotte mit Schwert aus Feuer 
Kreuz > Kirche 

Lichtstein > Flugdrachenhöhle 

Burg im Sumpf 

Sumpfding vertreibt man durch „zeige 
Lichtstein“; Vampir vertreibt man durch 
„zeige Kreuz“; in der Gruft liegt das Amu- 
lett; Burg verlassen und „reibe Ring“, ohne 
Ring kommt man nicht aus dem Sumpf 
raus. 


Inhalt des Turms — schwarzer Turm im 
Wald 

Amulett > Gruft in Burg 

Schwert aus Eis und Feuer > Höhle über 
Talkessel 

betrete Turm; dann immer „töte Zauberer/ 
Golem mit Schwert aus Eis und Feuer“ ein- 
geben. 


„Prophet“ 

Kreuz — Kirche 

Kirche 

spreche Priester; nimm Kreuz; bete zu Gott. 


„Drachenreiter“ 

Flöte > Hütte, 

Trockenfleisch > Hütte 

Flugdrachenhöhle 

spiele auf Flöte; gib dem Jungdrachen Trok- 
kenfleisch. 


„König“ 

Schwert aus Eis und Feuer > Höhle über 
Talkessel 

Prinzessin > Grotte hinter totem Drachen 
Schloß 

Drachen in der Höhle über dem Aschenfeld 
mit dem Schwert aus Eis und Feuer töten; 
mit Prinzessin zum König gehen. 


„Ritter“ 

Schwert aus Eier und Feuer > Höhle über 
Talkessel 

Prinzessin > Grotte hinter totem Drachen 
Schatz — Grotte hinter totem Drachen 
Kirche 

Drachen töten und mit Prinzessin und dem 
Schatz in die Kirche gehen; dann heirate 
Prinzessin. 
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8. Ziel: 


Man benötigt: 


Ort: 
Lösung: 


9, Ziel: 
Man benötigt: 


Ort: 
Lösung: 


10. Ziel: 
Man benötigt: 


Ort: 
Lösung: 


11. Ziel: 
Codewörter: 


„Magier“ 

Amulett > Burg im Sumpf 

Schwert aus Eis > Grotte unter der Grube 
im Wald 

Schwert aus Eis und Feuer — Höhle im Tal- 
kessel 

Höhle hinter Lavasee 

in der Hütte Lager untersuchen; runter; zie- 
he an Ring; Osten; Osten; wirf Schwert aus 
Eis in See; Osten; ramme Schwert aus Eis 
und Feuer in Steinblock; nach Aktion gib 
Amulett. 


„Adept“ 

Zauberstab > Turm 

Schwert aus Eis > Grotte unter Grube im 
Wald 

Schwert aus Eis und Feuer > Höhle im Tal- 
kessel 

Höhle hinter Lavasee 

wie Magier; anstatt gib Amulett, gib Zau- 
berstab. 


„Heerführer“ 

Schwert aus Eis > Grotte unter Grube im 
Wald 

Schwert aus Eis und Feuer > Höhle im Tal- 
kessel 

Stirnreif > Baumhütte 

Grotte mit Schwert aus Feuer 

töte mich mit Schwert aus Eis und Feuer. 


„Jäger“ 

Agia, Jessemon, Chockmah, Eloyn, Mem, 
Malcut, Geburah, Adonay, Binah, Tarn, 
Enoil Gavat 


Eingänge der Höhle der Bruderschaft „Enoil Gavat“: 


12. Ziel: 
Man benötigt: 


Ort: 
Lösung: 


Lösung: 


So, das war’s. 


1. Im Geheimgang im Schloß Wände unter- 
suchen 

2. Höhle unter Wasserfall (wirf Ring in 
Höhlung) und die Tür öffnet sich. 


Schwert aus Eis 

Ring — Grotte mit Schwert aus Feuer 
Schwert aus Eis und Feuer > Höhle über 
Talkessel, Lederbeutel > Turm 

Grotte mit Troll unter Grube im Wald 
öffene Lederbeutel; wirf Sand; töte Troll 
mit Schwert aus Eis und Feuer. Die Tür öff- 
net man mit dem Ring. 


Transmitter mit Codewörtern aktivieren 
Hauptcomputer: Code Tarn, dann Sicher- 
heitsstufe niedriger stellen 

Generatorraum betreten und Generator ak- 
tivieren (Codewort), zurück zum Gleiter und 
einsteigen; der Rest ergibt sich. 


Den Lösungsweg „Erlöser“ kenne ich selber 


nicht. Wenn jemand weiter weiß, bitte schreiben! 
(Jürgen Dahlhoff) JO 
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. „Garrison“ / Rainbow 
Arts 

. „Arazok’s Tomb“ 
Aegis 

. „Barbarian“ / Psygno- 

sis 

„Karate Kid II* 

Kingsoft 

. „Fairy Tale Adven- 
ture“ / Micro Illusions 


(64 


. „Ihe Last Ninja“ 

System 3 

„Defender of The 

Crown“ / Master De- 

signer 

. „Pirates“ / Mindscape 

. „star Paws“ / Soft- 
ware Projects 

. „otreet Gang“ / Rain- 
bow Arts 


C=16 


. „sommer-Olympia- 
de“ / Kingsoft 

„Terra Nova“ / Anco 
„Paperboy“ / Elite 
„Ihrust II“ / Firebird 
„Terra Cognita“ 
Codemasters 


& 
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Ihre Meinung ist gefragt! 
RUN startet eine Leser-Hit- 
parade. Alle Besitzer eines 
C16, C64 oder Amiga kön- 
nen teilnehmen. Sofort den 
Coupon (unten auf der Sei- 
te) ausfüllen, ausschneiden 
und auf eine ausreichend 
frankierte Postkarte kleben. 
Ab geht die Post an: 


CW — Publikationen 
Redaktion RUN 
Postfach 40 04 29 
8000 München 40 


Alle eingesandten Bewertun- 
gen werden nach den drei 
Systemen sortiert. Damit’s 
mehr Spaß macht, verlosen 
wir 80 aktuelle Spielehits 
(siehe Titelblatt Spieleteil). 
Da wir zum Start natürlich 
noch keine Einsendungen 


Ihrer Tips vorliegen haben, 
stammen die Top 5 vom 
Spiele-Experten Carsten. 


Zu gewinnen gibt’s diesmal: 


20 x „Defender of The Crown“ 
(Disk. für C64/ Amiga) von Rushware 


20 x „High Frontier“ 


(Kass./Disk. für C64) von Activision 


20 x „Sommer Olympiade“ 
(Kass./Disk. für C16/C116/Plus4) von Kingsoft 


10 x „The Last Ninja“ und 


10 x „Enduro Racer“ 
(je Kass./Disk. für C64/C128) von Ariolasoft 


VORSCHAU 


Bewegte Grafik macht den Reiz der neuen 
Computer aus. RUN berichtet aus einem 
professionellem Grafikstudio, gibt Tips für das 
eigene Design, testet Amiga-Grafik-Software 
und stellt die Gewinner des 
Animationswettbewerbs vor. 
Die nächste RUN erscheint am 21. Oktober 1987. 


Goldene Program- 
miererhände 


Weltraumgeballer, Zerstörung. Alles 
bekannt! „Goldrunner“ bietet mehr 
als ausgelaugte Abklatsche alter Bal- 
lerspiele. Superschnelles Scrolling for- 
dert den Spieler, Maus-Manöver las- 
sen den goldenen Flieger Rollen und 
Kehren vollführen. Welcher Pilot wagt 
den Kampf? 

Auf 20 Seiten unseres Extra-Spieleteils 
werden dieses und viele andere tolle 
Spiele vorgestellt. 


Schnellkurs mit 
C-Compiler 


Lattice C mit nur einem Laufwerk be- 
herrschen? Es geht! Ein Schnellkurs 
erklärt das Handling mit dem Lattice 
C-Compiler auf dem Amiga 500. Aus- 
führlich wird beschrieben, wie man die 


Il 
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Workbench, ‚aufräumt und eine N er- 
3. Höhle unt installiert, 


Höhlung) und lingungen für 
, it der Hoch- 
Schwert aus Ei 


Ring — Grotte 
Schwert aus E 
Talkessel, Ledk 
Grotte mit Tro 
öffene Lederb 
mit Schwert au 


net man mit des-ogrammer’s 


Transmitter mpibt eine Ein- 
Hauptcomputehigkeiten des 
heitsstufe niedpliothek in C 
Generatorraumulartige Tasks 
tivieren (Codemtig für jeden, 
einsteigen; der seine eigenen 
Den Lösungswill» ohne einen 
mand weiter we *- 


off) 
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- Bestellschein 


Ja, 


TEXT \@ 
"VERARBEITUNG \ 


DTP UNTER MS-DOS 
PAGEMAKER GEGEN 


Besuchen Sie uns mal in: 


Köln 1 - Maastrichter Straße 23 


Essen 1 - Schützenbohn 11-13 
DGB-Haus Porscheplatz 


München 22 - Bürkleinstraße 10 


Fordern Sie unseren Katalog an 
- für alle Informationen - 
mit allen Preisen. 


DELA immer aktuell, 


immer preiswert: 


Am besten gleich bestellen ! 


24 Stunden 
Anrufbeantworter 
02 21-71517 30 


Telefon: 02 21-7 1517 /20-22 
Telefax: 02 21-71517 60 
Teletex: 2214 248 DELA 


Versandbedingungen: 

Versand ab 40,- DM Worenwert kostenfrei. 
Nachnahmeversand NN-Spesen 7,50 DM, b. Vorkasse 4,00 DM. 
Auslandsbestellungen nur gegen Vorkasse + 15,00 DM Versand- 
kosten. Wir lieferen auf Ihre Rechnung und Gefahr zu den Ver- 
kaufs- und Lieferbedingungen des Elektronikgewerbes. 

Preis: Stand 15.8.1987 


Bestellcoupon ausfüllen, auf Postkarte kleben oder im 


Eprommer Il 


der Bewährte für 2716-27256 Option 27512] 
E-Eproms 27CKXX 

Programmierspannung 12,5 V/21 W/25 V 
Schnell- und Langsamprogrammierung. 
Textoolsockel, kein externes Netzteil. 


DM 79,80 


Dela Dos - Floppyspeeder 


Die preiswerte Alternative für aile, die keinen 
Eingriff in den Rechner vornehmer. wollen 
(Garantieverlust). 

Hier einige Optionen: 

8x schnelleres LOAD 

3x schnelleres SAVE 

Centronics Schnittstelle am Userport 
Funktionstastenbelegung 
Reseterweiterung 

kein Verlust der Kassettenroutinen 
kein Verlust der RS232-Schnittstellen 


Mm: DM 79, - 
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Eprommer Ill — der 
Viermegabyte Eprommer 

Die neue Eprommergeneration für C64/128. Der 
Eprommer Ill programmiert alle Epromtypen der 
27xxx Reihe einschließlich 27512, 27513 und 
2701 (IBM Eprom!. Die Programmierung von 
größeren Eproms als | MB auf der Basis der 
270ll-Serie ist bereits vorgesehen. Eine weitere 
Neuerung ist die Selbsterkennung von Eprom- 
typen. Weitere Funktionen: Auslesen, leertest, 
Verify, Kopieren, Modulgenerator. Geliefert wird 


DELA Elektronik * Merkenicher Straße 87-89 der Eprommer Ill im Gehäuse und mit Software. 
3000 Köln 60 DM149,- 

Bestellcoupon unon7 \ 

Art-Nr. Menge Artikel Einzelpreis 

[IIIIITI]) 0 

BERENEEE 

I 0 | 
Name Anschrift 
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Kunden-Nr. Datum Unterschrift 


Jetzt auch bei 


128 mal in der 
Bundesrepublik 


ab sofort auch in 
den Allkauf-SB- 
Warenhäusern und Allkauf-Fotofachgeschäften 
erhältlich. 


5-fach Umschaltplatine 


Es handelt sich um eine Umschaltplatine zur 
Aufnahme des Originalroms und vier zusätzlichen 
Betriebssystemen auf zwei 27128 Eproms oder 
zwei Betriebssystemen auf zwei 2764 Eproms. 


DM 29,90 
Epromkarte 2x8/16 K 


Die ideale Modulkarte für Einsteiger. Kann die 
Epromtypen 2764 und 27128 verwalten. 
Einfaches Handling. DM 14,- 


1-4-fach Umschaltplatine 


Die Kompaktel 

Je nach Epromtyp |, 2 oder 4 Betriebssysteme 
möglich. Absturzfreies Umschalten ist selbst- 
verständlich. Komplett aufgebaut mit Drehschalter! 


DM 24,90 


Super- 
epromkarte 


256 K 


inkl. Gehäuse, 256 K Speicherkapazität, 


8 Steckplätze für 8/16/32 K Eproms. 
Directory-Funktion und Modulgenerator. 
Programmstart aus Directory, kein Eingriff in 
den Rechner notwendig, ohne Vorkenntnisse 


zu betreiben. Präzisionssockel. 


DM 79,80 


Multifunktionsmodul — 


dos vielseitige Modul beinhaltet: 


® Hardcopy-Funktion ® DOSS. 
® Turbo-Disk ® Fast format 
©. D-Changer DM 39,90 


Speeddos-Anschlußkabel 


Die preiswerte Lösung, eigene Parallelspeeder 


zu erstellen. DM 24,50 
Userport-Adapter 

Verdreifacht Ihren Userport - z.B. für Parallel- 
speeder, Paralleldrucker, Eprommer uvm. 

Inkl. elektronischer Pufferung. DM 29,90 


Dela Nibbler 

Einer der besten und schnellsten Nibbler der 
Welt. Paralleles Kopieren von Track 0-41,5. 
Kopiert alle Readerrors und einzelne Spuren. 
Auch Sync-Fälle und variable Sync-Längen. 
Kopiert auch Speedänderungen. 

KOPIERT GANZE DISKETTEIN CA. 30 SEKUNDEN! 


DM 44,50 


